








£7 _ EVEN THE PRICE 
Y /ILL KEEP YOU | 
THE BLACK 


__ This sleek, black Microvitec CUB medium resolution — 
colour monitor has been designed to be totally compatible 
with the Sinclair Q.L. An ability to display 85 column text is 
ed with outstanding graphic capabilities — at a price 
k the bank. 


1p) 


(inc. VAT) —— 








Specification 
‘Model: 


CUB 1451/DQ3 
14” Q.L. Monitor 


RGB TTL input 
Tube Resolution (pixels) 
653(H) x 585(V) 
Dot Pitch 0.43mm 
Bandwidth 18 MHz 
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Competitions 


to problems associated with our re- 

ove, we have been unable to locate 
t resses of certain competition 
p ners. No doubt these readers are 
1 g about their prizes and we 
sk winners who have not yet 
d prizes to write or phone our 
e al offices so that delivery can be 











Information 


2ms that some readers were confused 
he function of last month’s free 
am. Those who typed it in will 
red that it is completely self 









you're still wondering, it 
he template (also free with 
issue) to provide single key 
file operations such as copying, deleting, 
| running and printing a directory. 

Finally, a note to all budding authors, 
whether experienced journalists or keen, 
first-time writers. We are currently 
paying top rates (up to £120 per text 
page) for articles which meet the required 
standard. All submissions are welcomed 
and will be carefully considered. 
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News 
QLN 


New products announced at the 


Which Computer? Show in addition 
to the usual line up. 


IQLUG 8 


User Group News 


News from the independent users’ 
group, compiled exclusively for QL 
User by its Chairman. 


13 
Next Month 


A host of good reasons why you 
should buy our April edition. 


Letters 
Open Channel 


Lots of letters from readers seeking 
enlightenment. 


Series 
Machine Code Tutorial 


The first practical lesson for begin- 
ners in machine code programming. 


Feature 20 


14 


17 


Terminal Emulation 


Transform your QL into an extreme- 
ly versatile communicator. 





Series 25 


C Series 
Part four of Peter Rodwell’s introduc- 
tion to C. This month, string and 
array processing amongst others. 


Feature 


Secret Locations 


The mythical places you’ve dreamed 
of but never dared to investigate... 


29 


5 BB Review 
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Hardware on the Horizon 


In depth reviews of the latest 
peripherals, with a quick look at the 
shape of things to come. 


Books 38 
Bookmarks 


All the latest QL literature, itemised 
and appraised. 


Competition 40 
Talent Spot 


Write a program and win some QL 
software. 


In Profile 42 


QL Plus 


A new feature series in which we 
focus on companies supporting the 
QL with hardware and software. 


| Programs 47, 56 
‘The Progs’ 

More readers’ programs, including 

our DIY Assembler. 
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QL Mk il 


A second version of the QL, 
incorporating the Psion 
software on internal ROM 
chip, is due for imminent 
release. Rumours are also 
circulating of a QL built 
around a disk drive instead of 
microdrives, and we can reveal 
that Sinclair is contemplating 
arival to the ICL One Per 
Desk. 

First news of the ROM 
software device was leaked to 
your reporter by Psion chief 
David Potter. 

“Two versions of the QL will 
be sold together,” he revealed, 
“one with the software on 
ROM, and one with it on 
microdrive. The ROM version 
will offer qualities of speed and 
integration similar to those on 
the ICL One Per Desk — 
though, of course, neither 
machine is capable of 
implementing the programs in 
ways comparable with larger 
computers.” 

ROM versions of the QL 
software were first mooted by 
Sir Clive last summer during 
the ill-tempered Press lunch 
called to smooth his company’s 


Resolution 
Resolved 


Sinclair would appear to have 
turned over a new leaf in the 
New Year. The promise ofa - 
microdrive cartridge price cut 
“by the end of 1984” has been 
fulfilled, give or take a month. 

The 60% reduction will be 
welcomed by all, except 
possibly the lines of ladies that 
used to hand-glue the devices 
together, whilst an expensive 
automated assembler stood by 
unused. 

QL software houses are 
likely to be the first to benefit. 
Previously they were faced 
with production costs of £4 to 
£5 compared to 65p or soon 
cassettes. Since the mark-up 
demanded by retailers and 
distributors is calculated ona 
percentage basis, and 
currently runs at 50% of the 
pre-VAT retail price their costs 
were doubled by the time 
programs reached the shelves 
of local W H Smiths. 

‘West’, the QL adventure 
from Talent Computer 
Systems, was a case in point — 
being supplied for the BBC 
Micro at £7.95, the 
Commodore 64 at £9.95 and 
the QL ata hefty £19.95. 
Talent’s Sales Director, John 
Tweedy spelt out the problem 
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ragged relations with the 
computer mags. Indeed, it was 
alunching hack’s assertion 
that any such product was an 
admission of inadequacy for 
the microdrive version which 
produced Clive’s fondly- 
remembered “For God’s sake!” 
outburst. 

In those distant days, 
however, the ROM was 
envisaged as an external 
cartridge to be sold asan 
upgrade to existing owners— 


L 


Psion Chairman, David Potter. 


far-removed from Potter’s talk 
of asecond QL with re- 
designed circuit board and 
bumped up price. 








in no uncertain terms. 
“Whatever program you put on 
amicrodrive cartridge, you’re 
going to have to charge £19.95 
minimum; until Sinclair 
reduce the price of microdrive 
cartridges, I see no other way 
of arriving back at our cassette 
tape profit of £1.50 per 
program. And that’s assuming 
wholesalers are prepared to 
reduce their mark-up.” 

As regards timing, the price 
cut would seem to have come at 
amost propitious moment. The 
appearance of disk interfaces 
for the QL mean that the 
cartridge is no longer the only 
mass storage medium 
available. Furthermore, the 
imminent arrival of a cheap 
cassette interface looks set to 
further undermine that 
position. 

Whether the price cut will 
entice more software houses to 
produce for the QL remains to 
be seen. Doubtless, concern 
over the reliability of the 
medium will also figure in their 
calculations. “Just recently 
we’ve improved QL 
microdrives immensely,” says 
Sir Clive. “You'll be surprised.” 
We hope so, for if this is the 
case then Sinclair’s strategy of 
QL storage on microdrive, hard 
disc and wafer scale RAM 
suddenly makes sense. 








Sinclair Research has since 
confirmed that the Potter 
revelations are “not far off the 
mark”, 

No such official support has 
yet been given to rumours ofa 
QL incorporating a floppy disk 
instead of microdrives, though 
such an option (built, 
presumably, around a 3” or 3.5” 
disk) would extend the 
machine’s appeal to people who 
can afford to indulge their 
belief that microdrive 
technology — which works well 
in its 85K Spectrum 
manifestation — has been 
pushed too far for the QL. 

We have no doubts, however, 
about Sinclair’s ambition to 
sponsor a rival to the ICL One 
Per Desk. 

The OPD is an excellent 
concept, but the 
announcement of forthcoming 
alternatives from 
manufacturers such as Acorn 
Computers has exposed the 
widespread belief that it may 
be vulnerable— particularly on 
price. It’s certainly hard to see 
how the addition of a modem, 
monitor, real keyboard, 
telephone handset, ROM 
software and new operating 
system can make the OPD 

worth £1100 more than the 
straight QL (Acorn, for 
instance, intend to come in at 
around half the OPD’s price). 

Sinclair’s sponsored OPD 
emulator is in the early stages 
of development by a well- 
known software-orientated 
company, whose name we 
cannot reveal. The product is 
planned asa microdrive 
cartridge and manual, costing 
£79.95 or less and issued under 
the Sinclair logo. 

Intended for existing owners 
of the QL and its semi-official 

OE modem, the software will 
be an extension of Archive and 
will offer — particularly when 
the ROM software QL appears 
—many of the facilities of the 


-OPD. 


Instead of the Scicon comms 
software found in the OE 
modem, the company behind 
the OPD emulator has been 
examining the possibility of 
C-based material from a third 
party. My latest information, 
however, is that the Scicon 
material will after all be used. 

Though not as flash-looking, 
Sinclair’s product will 
undercut the OPD so heavily 
that the latter’s sales are 
certain to be threatened. 
Indeed, the prospect is so vivid 
that it’s hard to imagine no 
agreement exists restraining 
Sinclair from such an exploit. 











Sinclair Research is refusing 
to make any official comment 
on the plan. 

All three Sinclair 
permutations around the QL’s 
central processor board (a 
component universally 
admired, and so ripe for 
exploitation inside other 
hardware that one 
industrialist told me, “The QL 
will be a great success — and not 
merely as the QL,”) are in the 
mainstream of the company’s 
Searle-inspired resolve to 
adapt existing hardware for a 
wide range of market-niches 
and pocket-depths. 

The imminent arrival of 
68000-based machines from 
Atari and Commodore 
sharpens Sinclair’s need to 
rapidly exploit its one year 
hardware lead. 








Spirited Rivalry 

GST (that’s G for George, not C 
for Charlie), are about to 
produce the first applications 
program for 68K/OS — the 
operating system which 
Sinclair commissioned them to 
write way back at the 
beginning of 1983, replacing it 
with QDOS (amongst much 
mutual recrimination) just 
after the QL’s January 84 
launch. 

Although they got paid for 
their work on K/OS, and have 
been gratified by 
endorsements from 68000 
manufacturers Motorola, GST 
were naturally disappointed to 
find their baby with neither 
software nor hardware 
support. 

However, K/OS has since 
been issued un a plug-in board 
for the QL, and arange of 
software products are now 
imminent. 

“The QL with 68K/OS is an 
extremely versatile system,” 
said the company’s Joe 
Webster — who wrote part of 
K/OS, “and we are almost 
ready to announce a word 
processor, either on tape or in 
ROM, which would allow the 
QL to be run as a powerful 
multi-tasking business 
machine. We're talking to 
other companies about Pascal 
and Fortran compilers, and C is 
onits way.” 

Webster conceded that, until 
it attracted serious support, 
the position of K/OS would be 
distinctly uncomfortable. 
However, after hints about its 
possible adoption by some of 
the big American 
manufacturers about to launch 














6800-based machines, and 
after re-iterating his hope that 
other software suppliers would 
approach GST with plans for 
K/OS material, Webster 
showed himself to be 
sufficiently bullish for a quick 
knifing of rival QL operating 
systems. 

Quest’s CP/M 68K 
implementation was 
unworkable on microdrive, he 
insisted, and their disk 
systems didn’t work (Quest 
deny this, of course). 

He hadn’t previously heard 
of the CP/M 80 board from 
QL-Plus, but didn’t see how it 
could work with QDOS — even 
when informed that QDOS 
author Tony Tebby was 
(naturally) involved in its 
implementation. 

QDOS itself he dismissed as 
“not even a real operating 
system”, citing its inability to 
handle multi-tasking 
windowing operating 
adequately, its programmer 
unfriendliness, and its lack of 


portability to other systems. 
(All of this is rejected by Tebby 
—who, it’s felt, often defends 
his brain-child by defining 
QDOS as only the very core of 
the QL’s firmware, whereas 
outsiders tend to regard all the 
QL’s firmware as part of 
QDOS, including — sometimes 
—SuperBasic itself. QDOS 
can’t be accused of bad screen 
handling, thinks Tebby, since 
the screen handling is 
performed by outer shells of 
the operating system, not by its 
flexible, portable, 
programmer-friendly heart). 

Webster insists we shouldn’t 
get too worried about GST. 
“We are a reasonably 
substantial, and reasonably 
successful company. We 
regard K/OS and associated 
products asa speculative 
venture which might bring usa 
great deal of money. Ifit does 
we'll be thrilled to bits— but if 
the whole thing falls flat on its 
face, we will survive and still be 
profitable. 





ForSale | 


“ICL has used some of the 
custom chips and other 
components from the QL. 
There’s also been a degree of 
collaboration with Sinclair 
Research — in the sense that it’s 
their design but they’ve had 
free access to us for 
information about microdrives 
and other shared items.” 

This was how Managing 
Director Nigel Searle 
explained the complex story of 
Sinclair’s joint work with ICL 
on the latter’s One Per Desk 





The ICL ‘One-Per-Desk’ in action. 





micro. Equally convoluted is 
the arrangement Sinclair has 
reached with GST. This 
Cambridge neighbour of 
Sinclair is acting as a sort of 
technology retailer, selling the 
QL board to companies 
wanting to incorporate it in 
their own machines. 

“You know that GST 
developed an alternative 
operating system for the QL 
called 68K/OS,” Searle 
reminded me. “We have adeal 
whereby we supply GST with 
boards, and anyone who wants 
to build a product around the 















QL board — with or without 
microdrives and 68K/OS— 
should talk to them. 

“We’ve got a power of veto 
over the end product, since we 
don’t want anyone buying the 
QL board to produce a direct 
competitor for the QL or the 
OPD. And, unlike the state of 
affairs with ICL, we won’t be 
offering GST clients much in 
the way of technical advice. 

“The OPD isa lot more than 
just a QL,” continued Searle. 
“Although it has the same sort 
of computing power, it’s gota 
great deal of communications 
capability and ICL have 
written their own operating 
system to take advantage of 
that.” 

Interestingly, both Searle 
and Psion chief David Potter 
thought that the OPD could 
read data cartridges from the 
QL. They’re wrong, says ICL; 
the OPD allocates microdrive 
data in 1K portions, claimed to 
be more reliable than the QL’s 
0.5K. 

And what of the OPD itself? 
Well, the device undoubedly 
addresses an important new 
market, but to these eyesit’s 
disappointingly expensive, and 
too big for the managerial 
desks it aims to fill —like the 
QL, it has suffered from 
Sinclair’s inability to make 
enough flat TV tubes to keep 
up with a computer assembly 
line (Ididn’t like the colour 
scheme either!). 


Intelligent Terminal 


The supply of several hundred 
QLs to students at a Scottish 
uiversity seems likely to 
involve the machine in some of 
the UK’s most advanced 
computer research. 

One hundred QLs from 
Sinclair Research, and several 
hundred more from the 
University itself, will be 
provided on extended loan to 
students at Strathclyde 
University. Strathclyde’s 
importance as a centre of 
research into machine 
intelligence, as well as its 
strong links with the Turing 
Institute, will mean the 
development of artificial 
intelligence (AI) programs on 
the QL. 

The University is keen to use 
the computer’s 
implementation of Lisp (a 
language much used in AI 
work) for tuition and research 
on such advanced computer 
capabilities as expert systems 
— databases capable of 








responding to enquiries ina 
way comparable to human 
experts. On a more mundane 
level, the QL will be used asa 
terminal for the University’s 
existing computer network. 

Sinclair Research also 
supports the nearby Turing 
Institute (named after the 
British computer pioneer), 
which was opened late last 
year as acentre where 
scientists can come to acquire 
experience of AI work. 

Judith Richards, Assistant 
Director of Advanced Studies 
at the Institute, explained that 
experience in porting a small 
expert system shell to the 
Sinclair Spectrum convinced 
her that the QL could be even 
more useful in AI research. 

“The QL will be capable of 
handling much more than just 
this small demo shell, and 
because it’s inexpensive would 
form a good basis for people 
who want experience in expert 
systems without making a 
large investment.” 

Even the Spectrum had been 
capable of useful work, she 
explained, the Expertease 
program from ITL being used — 
for example—to build up an 
expert system which could 
decide on the maintenance 
schedules of helicopter 
engines. 

“Provided you don’t need a 
really large database, and 
provided the shell will port over 
—and there’s no reason to 
believe it won’t — the 
applications possible on the QL 
will be fairly varied.” 

Commercially available 
software might also develop 
out of the Strathclyde work. 
“The QL has the capability of 
producing a great number of 
business and expert system 
packages, and if the University 
works on the machine it’s 
likely that there will be at least 
some pre-competitive 
packages around for other 
people to take into commercial 
exploitation.” 

The QLis unlikely to find 
much use at the Institute itself 
—where the fashionable 
hardware is all VAXsand such 
—but Sinclair expect the 
University to serve as a test- 
bed for the machine’s 
usefulness in higher education, 
apparently hoping that every 
interested student at 
Strathclyde will gain 
experience of the computer, 
and that, as Judith Richards 
puts it, “students will become 
committed to programming on 
the QL and will want to go on 
using it when they leave”. 
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There are now over 15 IQLUG local 
groups around the country, and on 
the continent, including London, 
Birmingham, Manchester and in the 
west, Bristol. 

The Swindon weekend workshop 
last November is to be repeated three 
times during 1985, commencing with 
one in March. The programme will 
include sessions on assembly lan- 
guage, BCPL, Archive applications, 
DIY hardware interfacing, disk 
drives and memory expansion, and 
communications. Many suppliers of 
hardware and software will be there 
to demonstrate their products and 
answer questions about them. 


Lost Memories 


Some members who purchased mem- 
ory expansion modules (such as Sim- 
plex Data’s 256K unit) have been 
surprised when using Archive, for 
example, that they only appear to 
have about 115K of additional mem- 
ory. In fact, they have what they paid 
for, a full 256K of additional RAM, 
but QDOS filches quite a lot in order 
to increase the size of its buffers, 
enhancing microdrive performance. 
This is borne out by the experience of 
one member who found that Quill 
now only “hangs up” for fractions of a 


IQLUG is a non-profit making group, with 
officers democratically elected by members 
at an Annual General Meeting. Accounts 
are independently audited and made avail- 
FeVe) Comm noms nelcdeel o-)q-pam MoleMoauoley obs Cor-be Ol it-Uncve Mine) 
the Association of Computer Clubs. 

Membership is by subscription to Quan- 
ta, the group’s monthly newsletter, con- 
taining 40 pages of members’ letters, hints 
and tips, news on the QL scene, program 
listings, reviews and so on. 

The group maintains a (mostly) free 
software library, which currently contains 
about 100 programs. All library software is 
written by our members, and only non- 
commercial items will be held there. In 
addition, a free advice service is provided: 
members can phone in with their problems, 
and be put in touch with someone who can 
help them. A register of members with 
expertise in various areas is kept. 

Membership details are available from: 
Brian Pain, 24 Oxford Street, Stony Strat- 
ford, Milton Keynes MK11 1JU. 
Telephone: 09087 564271 
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The latest in news and Information from Leon Heller, 





Chairman of the Independent QL Users’ Group. 








User Group News 


second when using overlays, instead 
of several seconds. 


Length Limitation 

Using disks on QL (with CST’s excel- 
lent interface) it appears that Quill 
has one serious limitation that no- 
body seems to have discovered (prob- 
ably because it is so impossibly slow 
with documents greater than a cou- 
ple of pages when using microdrives), 
in that one cannot work with docu- 
ments longer than about 12 pages. 
Merging in another document, or 
copying a block, results in an “out of 
memory” message and the whole 
system “locking up”, necessitating a 
reset, and the loss of the text in 
memory. Archive runs very well on 
disk, which makes the limitation in 
the number of records that I men- 
tioned in the December/January 
issue much more aggravating. 


Quill Again 

An IQLUG member rang me to ask 
how to remove a forced page break, 
since SHIFT —{, as recommended in 
the documentation, does not work. 
With a little bit of experimentation, I 
found that CTRL —-{ is the correct 
way to doit. Whatever youdo, DON’T 
type CTRL as the system will “lock 
up”, and have to be reset, probably 
resulting in the loss of your docu- 
ment. Psion know all about this bug 
but it’s a pity they seem to keep it t- 
themselves. 

A recent letter from one member 
complains that if he opens and closes 
channels repeatedly, incrementing 
the channel number each time, he 
eventually gets an “out of memory” 
message, and the system has to be 


O.K. Wilf, print. 








reset to operate properly. Why he 
should want to do this escapes me, 
but the explanation is quite simple. If 
you open channel #1000, for inst- 
ance, buffer space for channels 0 to 
999 is also allocated by QDOS, so it is 
wise to keep your channel numbers 
sequential, starting from #3, as a 
rule. 


Rewrite On Cartridges 


If you didn’t enclose your Psion 
software cartridges when returning 
your QL to be upgraded, and now 
have two sets, the write-protection 
can be defeated by sticking a small 
piece of Sellotape 15mm square over 
the missing lug on the right-hand 
side, enabling the old cartridges to be 
re-used. At nearly £5 a time, this 
makes a lot. of sense. My thanks to 
Bill Cowhig for this tip. 


Disk Save 


Now that I have double-sided disk 
drives on my QL, but still possess 
plenty of the single-sided variety 
(used formerly on my TRS-80), I find 
the latter are quite satisfactory. 
QDOS should lock-out faulty sectors 
on disk anyway, when formatting, 
just as it does with microdrives, so it 
is probably not too risky. Anyway, it 
saves a few quid! 


Plug Lugging 

Don Gehring has informed me that 
QL power supplies are available 
separately from Sinclair at Camber- 
ley for £9.95 each. One of these might 
be very useful if, like Don, you take 
your QL to work with you, and don’t 
want to lug the power supply around, 
as well. 






























santler manufactured 
specially for the QL System. 


*Angled Keyboard for . 
practical in-case use. 


*Space for 24 Cartridges, 
~ QL-accessories & Manual. 


*Size conforms to Airline 
hand luggage specifications. 
* Fully Guaranteed for 2 years. 















Offer is for the case only. 
‘QL’ isa registered trademark of Sinclair Research Ltd. 








First, fuse together your Sinclair QL with QL/APL. 
Immediately you've expanded your QL’s potential to the 
maximum. 


The unique QL/APL programming language frees you 
from the constraints of loops and endlessly long programs. 
QL/APL lets the computer cope effortlessly with data types and 
numeric precision and all that technical stuff. Leaving you free to 
get your QL to work for you, not against you. 


QL/APL is easy to work with, so it’s simple to write your 
own applications. 

QU/APL is modular, so you can build up systems 
step-by-step. 

QL/APL is interpreted, so changes can be made and 
tested immediately. 


QL/APL is incredibly powerful, so you never come up against i 


annoying limitations. It's the key to taking advantage of the full 
32-bit power of the QL’s 68008 processor. It runs on the standard 
QL keyboard, and allows full access to QL 

colour graphics and windows. And it’s built 

around MicroAPL's highly- respected IBM- 

compatible implementation of the APL 

language — in fact APL was originally 

developed by IBM for its mainframes. 


A software pedigree you can trust implicitly. 














Remember, for QL, read OL/APL. 
And blow the | rest 


EE SS oe me eS ee a | 
Pr: MicroAPL Ltd, Unit 1F, Nine Elms Industrial Estate, 
87 Kirtling Street, London SW8 5BP. i 


i L] Please send me more details about the power of QL/APL. 
i ] Please send me ———copies of QL/APL at £99.95 plus £1.95 p&p | 
| enclose cheque/P.O. made payable to MicroAPL Ltd. 
Please charge my Visa/Access card number i 
4 Card expiry date : 
| | eel 
ale | [Sis | 



































Name: 


Eigen 


Address: 
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(Prices include VAT. Please allow 28 days for delivery. For credit card telephone orders, phone 01-622 0395). 


SX FUNCTION KEY CONTROL 9& INSTANT WINDOWS 4 
JECURSOR CONTROLLED DRAWING BOARD ~/o \W—___ 
JrHI. RES. PRINTER DUMPS HEADINGS | \cc% 
3K UDG DESIGNER 9& PAINTBOX COLOUR 
JeFULL FILE MANAGEMENT %& TURTLE 4 

GRAPHICS %& SPOOL DRAWING TO 

BASIC LISTING ON PRINTER OR 


MICRODRIVE 
TINY ; 
‘ack, 4 DH 
ae Gaal 
a3 
Q 
The Ultimate QL Graphics Aid 


£14-95 


+ £100 P&P 


Please allow 28 days for delivery 
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pa en trace. 
ts, watch for 


Catches address trap erro str 
Initial 5 window display, allowing disassembly, tracing, 
different windows. 


Basic-like commands for full window/channel control, allowing output fo any device. 
| (Includes open, close, paper, ink, strip, border). 


Fulljob control-load, stop, suspend, & alter priority of jobs. Ability to monitor several 
_febs, and display information about all current jobs. 

Special facility to make monitor commands separate jobs, thus giving continuously 
_ updated picture of jobs progress. (eg. register value, memory locations etc.) 
Allows 68000-like addressing modes, including memory indirect. 






imping, register display to 
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Cidersoft 


X) 234 
Y) 168 


Co-ordinates 


PAPER [1] [2][3] [4] 


EIDERSOFT (QL) 
FREEPOST, PO BOX 54, 


ILFORD, ESSEX 


IG1 1BR. 


Tel. 01:478 1291 
Telex 8951807 


DG tea fol east Wm a Won 1g War Wa @) OR 0) aoe | af 11.) 
then phone us for the best deal 
in town. 


Dealers 
Please 
Phone 





SCIENCE PARK, MILTON ROAD, CAMBRIDGE 


Name 





Address 








Signed 





Please Tick 





MONITOR 


Please send further details 


Method of Payment- 
by cheque or P.O. (no cash) and made payable to 
COMPUTER ONE, or by charge card: 

Access No. 


Total amount £ 
enclosed with order 

Credit card sales: UK buyers only. 
Please allow 28 days for delivery 














_— a 





















































nc VAT & p&p. 
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“UNLEASH YOUR OL” 


NEW SYSTEMS PACKAGES — NOW WITH 
ODOS COMPATIBLE INTERFACE & DISK DRIVES 








CAN YOU GET THIS KIND OF SERVICE IN THE HIGH STREET? 
WE PROVIDE FULL TECHNICAL ADVICE & AFTER SALES SUPPORT. 


FACTORY- WE 
NO. TESTED . ALL foley EVEN FIT 
INTERFACE BEFORE CABLES oe MAINS 


PROBLEMS DESPATCH 1 U] od od | =D) TO USE PLUGS TO 
TO YOU EVERYTHING 














PRINTER & MONITOR PACKAGE DEALS + OL OPTION 


MICROVITEC PHILIPS 

PRINTER CHOICE WITH COLOUR OR GREEN/AMBER 

MONITOR MONITOR 
Brother HRS + Mains Adaptor £425 £265 
Brother M1009 £459 £295 
Epson RX80F/T £585 £420 Printers are all supplied 
Epson FX80 £725 £590 with RS232C interface. 
Epson FX100 £869 £735 Monitors display full 85 
Canon PW1080A NLO £649 £495 columns of text. 
Daisystep 2000 £599 £445 
Brother HR15 £715 £569 
Epson DX100 £745 £590 


‘ SINCLAIR OL SUPPLIED WITH ANY SYSTEM - £389 





NOW ADD DISK DRIVES! 


OL Disk Interface... cccccccccecccccesseceesssesessees £149 ee FOR OL 
5Yain. Computamate (200KB) ........0.... £299 JLOUR: 
Disk Drive + QDI (400KB) ......00.sceenee oe. a 
+ Power Supply (1000KB) ee ee £367 MONOCHROME: 
Dual 5Yin Disk Drive (400KB) ......... ee. £459 — Philips BM7502 (Green) o........ceccecscscssesesssssesssseeesssseeeen £92 
+ ODI + Power Supply Pecested in dsaste setts Leesan see £515 Philips BM7522 (Amber) soaatacete satarmed ease eR Wiigute winacesewetasaEETEE £92 
BITE 12 session nroeonrsvinatotcsinleatsocnptnepimoniteniionens £574 AGGESSORIES 

: nterlocking Storage Box for 10 Cartridges............. £5.95 
3'2in Computamate (200KB) n-ne F289 oson RS282 Woe teeececmanc, £30.00 
Disk Drive + ODI (400KB) ....... eee £336 = EpsonRS232V/F2QK occ ec ccecce, £65.00 
+ Power Supply (1MB) ........0.cce eee £367 Miracle System VF ooececcccceecceccetseeestesesteseseten £39.95 


Prices include cable, manual. 


ALL PRICES INCLUDE VAT. 
FOR DELIVERY ADD £10 (Systems/Monitors). ADD £2 (Accys). 
Other Systems can be supplied on request. 
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ZEAL MARKETING LIMITED 


VANGUARD TRADING ESTATE, STORFORTH LANE, 
CHESTERFIELD, S40 212 
Telephone: 0246 208555 Telex: 547697 











Games Programming: 
Machine Code Techniques 


A new series designed to teach low level games 

programming, using a modular approach. Each montha 
different area is covered, so that by the end you should be 
well-versed in all aspects of writing machine code games. 


Sound Synthesis 


Despite the QL’s limited sound capabilities, there’s stilla 
lot you can do with a few simple commands. We tell you 
which . 


Readers’ Programs Special 


No doubt due to the winter cold spell, we’ve been 
inundated with readers’ programs. Here’s your 
chance to see the best of them. 


Sinclair Software 


With the drop in microdrive prices, software is beginning 
to take off. We take a look at what’s on offer from Sinclair 
and others in the software market. 


The Typewriter Interface 


| Printers and monitors are not the only peripherals you 


can connect to the QL. Electronic typwriters can act as 


| second keyboards, printers and communications 


terminals. We survey the potential candidates. 


PLUS: 


| —Turtle Graphics and how to use them. 


—Relational databases on Archive. 
—Experimenting with Abacus. 


AND: 


Part two of our disk drive reviews, with products from Quest and 
MicroPeripherals. 





APRIL ’85 EDITION ON SALE: 21st MARCH 











| Photo Finish 





























He 


Asa very keen chess player I 
have been waiting for a micro 
to emerge with a strong chess 
program before plunging into 
the ‘micro revolution’, ie I’m 
one of those rare beasts who 
doesn’t own a computer (gasps 
from readers). [read with 
great interest your review of 
Psion Chess but unfortunately 
you didn’t mention one 
extremely important point... I 
assume Psion Chess recently 
won the 4th World Micro 
Computer Chess 
Championships? Can you 
confirm that this is the same 
program, asifitis, I for one, 
will buy a QL on the strength of 
that alone. [hope the computer 
didn’t really play D7-D5 (Q to 
Q4) in the position shown on 
Level 11, or it’s back to boring 
human opponents! 

AE Millward 

Sheffield 


Psion Chess did share first 
place with three dedicated 
computer chess machines 
though it must be added 
that the program ranona 
full 32-bit Sage computer. 
However, aside froma 
reduction in speed its 
erformance should be 
identical ona QL. 

As for the move D7-D5 we 
have to admit that the whole 
set-up was contrived so as 
to produce an interesting 
photograph as opposed to 
good chess and level 11 was 
selected only after all moves 
had been made on level 0 
(novice). 
























































- : 
Memory Drain 

Are you under the © 
impression that if you ‘NEW’ a 
BASIC program on the QL, 
then it disappears from 
memory never to be seen 
again? Not so! When you load 
another program, the previous 
oneis still in memory; in fact, if 
you load a succession of 
programs, they all stay in 
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This is the spot where we turn the magazine over to you, our readers. We welcome 





any comments, criticisms or anecdotes about either the QL or QL User. 
The address to send your letters is: 











Open Channel, QL User, Priory Court, 30-32 Farringdon Lane, EC1R 3AU. 





This short program will show 
this: 


10 FORi=213500 to PEEK _ 
L(163856) 

20 PRINT CHR$(PEEK (i)); 
30 END FORi 


The address 213500 is 
approximately where the 
program starts, it seems to 
vary slightly. Also held is the 
microdrive directory, which 
seems to include some items 
which have previously been 
deleted from the cartridge. 

Ican find no way to access 
these multiple programs, so 
this seems to be a fairly useless 
discovery. However, I think we 
should note that they are 
taking up memory space, and 
should you need a lot of 
memory for a program, this 
may cause problems. 

NJ Lennon 
Newquay, Cornwall. 


Gone To C 

Where has “C” gone? I looked 
forward to further instructions 
as lam writing large business 
programs in BASIC and this 
seems to be a perfect 
alternative in both speed and 
memory usage. 

If for whatever reason you do 
not intend to pursue “C” 
further can you advise where I 
may find a book onit. 

Paul Thurlow 
Dorset 


Well ‘C’ is back and will 
remain a regular feature. 
However, the fact thata 
compiler has yet to come out 
for the QL does seem to 
dispell any urgency in the 
matter. Hopetully, one will 
materialise from the US 
(Lattice) in the near future. 
Whilst Cis fast and 
efficient it can hardly be 
considered the perfect 
alternative to BASIC, 
rather a unique half-way 
house between Pascal and 
Assembler. As a tool for 
writing large business 
programs itis as useful asa 
scalpel is for slicing bread. 
The incisions may be 
precise but it will be a while 
betore you sit down to eat. 
Don’t however be put off, 
as Cis nevertheless a great 
language. The definitive 
work on itis Kernighan and 
Ritchie’s “The C 
programming Language” 
(Prentice Hall — £21.95). 











Tolerant Customer 


Thave hada QL since July, but 
have only just come across 
your very valuable publication. 
What I read there rather 
surprises me, but suggests that 
either I have been very lucky, 
or more likely that the QLis 
not a beginners machine. The 
complaints about the 
standards of documentation, 
which is particularly high in 
the case of the Psion packages, 
seems to bear out the latter 
conjecture. 

Thave experienced the 
following difficulties: 

1) Three of the four 
applications packages would 
not read when received. 
Solution: return to Sinclair. 
New copies were received 
within 10 days. Ihave had no 
other problems with the 
microdrives since. 

2) Quite bizarre behaviour 
from Quill when using tabs 
together with a text width 
greater than the screen display 
width. Solution: Use 80 column 
display width, this is just about 
acceptable with a 12” 
monochrome television, very 
good with a 9” Hitachi monitor. 

3) The Psion printer driver 
cannot be set up to switch off 
underline on my Brother HR5 
(no problem in SuperBasic). 
Solution: Use the enlarged 
character set instead while 
waiting for next edition (who 
needs underlining anyway). 

There are faults. Quill use 
too much overlay, which slows 
it down, but the next edition 
should cure that. The keyboard 
action is less than perfect, but 
acceptable at the price. The 
manual does not give enough 
information on the operating 
system. Export is clumsy. But 
my main complaint is that 
whoever decided that the 
microdrives should be referred 
toasmdv1l_andmdv2_ rather 
than A: and B: should be shot. 
RLGalloway 
Herts 


Humbug! 


In your Dec/Jan issue of QL 
User a G.L. Riddle had a letter 
on the Open Channel page 
about a bug in the SuperBasic 
DIM statement. I do not think 
this is a bug. The 68008, being 
a 16 bit processor, must fetch 
WORD information from even 
memory addresses. Therefore 
the interpreter must ensure 














| that the DIM is always of an 
even length. Any DIM, with an 
odd argument will be stepped 
up to the next even argument 
(remember that the string 
starts from element 1;. 
Neil Beattie 
Kent 
a 


Assembler Is 
The Key 


Thave an AH version of the QL 
and I’m not sure whether there 
isa section missing in my 
manual, (or ifit is possible) but 
how do you define the five-user 
defined keys? 

» I’ve tried using the method 
employed on the BBC and 
others but allI get is error 
messages. 

P Howland 
Hereford 





The answer is quite simply 
thatitis impossible to 
program the keys witha 
simple SuperBasic 
command. Assembly 
language is your only hope. 


Duplicate Refit 


Referring to the early 
hardware problems, my own 
QLis D05 (‘AH’), but during 
the ROM refit very recently.a 
sticker with D12 was put on. I 
noticed that Sinclair had put 
on anew keyboard and 
included a copy of the latest 
User Manual free of charge 
after I complained about the 
standard of the earlier one. I 
hope the above provides useful 
guidance for other readers 
with similar machines. 

With regard to microdrive 
problems, the only ones I have 
experienced have been with 
Psion’s software failing to load. 
Both my early Archive and 
later Quill-update tapes had to 
be replaced. This must be a 
fault with the Sinclair 
duplication methods as other 
software I have purchased and 
exchanged with other people 
has always behaved 
faultlessly. Apart from these 
Psion tape problems both (or 
all 3!) of my microdrives have 
performed exactly 100% from 
receipt in the middle of June, 
which is more than I can say for 
any floppy disk or Winchester 
units I have used. When people 
complain of problems they 
must be referring to the first 
QLs, all of which have been 
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upgraded — or are they perhaps 
on commission from disk 
interface manufacturers? I’m 
sure many others have had 
cause to return the Psion tapes 
so we’re left to wonder why 
Sinclair still haven’t 
recalibrated their duplication 
process as this is the only flaw 
to what I regard asa brilliant 
machine. 

John Lawlor 

Aberdeenshire 


Soft Spot 


There are so many things to 
say about the QL I hardly 
‘know where to start. For some 
years now I have worked asa 
freelance programmer on large 
IBM mainframes. I have 
always felt discouraged from 
buying a home computer, 
because however ingenious the 
little programs may be, trying 
to use them to do anything 
sensible was like being ina 
straitjacket compared with 
having the sophistication of 
monster system software at my 
disposal. The QL is the first 
affordable micro with power 
approaching that of the big 
machines. 

Three important features 
combine to bring the QL to the 
frontiers of mainframe 
computing power: 
multitasking, the breaking of 
the 64K memory barrier, and 
the evident commitment on the 
part of several companies to 
producing heavy-duty 
software like compilers and 
assemblers which are designed 
torun in the background while 
the user can continue 
interactive work like editing 
(or playing games, I suppose). 
Although the big boys often 
have 24 or even 32-bit 
addressing (giving a 
theoretical limit of 4096 meg), 
most mainframe tasks 
individually use no more than 
512K. Think about it. 

Finally, lam very excited 
about the announcement of 
APL for the QL. Ihave a soft 
spot for APL as it was the first 
language I ever learned. I 
would urge any newcomer to 
programming to look at APL 
rather than BASIC. Anyone 
who has used a calculator will 
feel at home with elementary 
APLat once: you type ‘3’ and 
the answer comes back: ‘3’. 
Enter ‘5+7’ and you get ‘12’— 
no PRINT command is 
required. For arithmetic, APL 
uses the same symbols we all 
learned at school—eg ‘x’ 
instead of *’ for multiplication. 

I would strongly advise 
against buying the keyword 
version. No sensible manual 
would begin by introducing the 











novice to the wonders of matrix 
divide, for instance, and I don’t 
remember being at all put out 
by the more exotic symbols. 
Your keyword APL examples I 
thought a bit of a mess! To offer 
the keyword version for 
separate sale would be 
scandalous, anyway, as each of 
the keywords could be written 
in ten seconds flat as a one-line 
function in standard APL, by 
someone who doesn’t even 
know what the keywords do! 
As for displaying and printing 
the special symbols, MicroAPL 
would do well to provide some 
kind of plastic overlay for the 
keyboard, and perhaps also an 
APL character set for 
downloading to the most 
popular printers that allow 
user-defined characters. 


Ian Ray 


Cambridge 


Now what’s this about 
keyword APL? First, we 
would point out that 
standard APLis available 
for the die-hards anyway so 
your recommendation 
would seem alittle strong. 
Next, references to how 
easily matrix division may 
be performed using APL 
were supposed to illustrate 
the power of the language 
not to encourage 
innumerates to dispense 
with their times tables. 
Finally if APL is to 
compete with BASIC it 
should be easy to pick up, 
simple to use and self- 
documenting. Standard 
APL with its exotic symbols, 
special keyboards or 
download character set 
fails to make the grade. 
Keyword APL with its 
standard character set and 
elements of plain English 
comes much closer. 
Whereas the former was 
designed to introduce 
matheticians to 
programming, the latter 
stands a far better chance of 
introducing laymen to both 
programming and 
mathematics. 








Serial Hiccup 


Ihave recently purchased a QL 
and first let me say that lam 
absolutely delighted but for a 
few minor hiccups. The reason 
Tam writing is to give you and 
your readers a piece of 
information which may be of 
some benefit. 

The first thing I did with my 
QL was to try to copy the Psion 
packages. However, I had 
considerable difficulty. Iread 
in your Oct/Nov issue of 
problems with microdrives 








apparently running at- 
different rates. Well after 
various tests I realised this was 
possibly what was wrong with 
mine. The most apparent 
symptom was the inability 
sometimes to get a directory on 
Drive 2 ofacartridge that had 
been formatted and written to 
on Drive 1. 

Imentioned my suspicions to 
the shop where I bought the QL 
and was informed that they 
had had several similar 
complaints from owners of 
machines from a certain batch. 
The serial number of my 
machine started -02 and was 
replaced with no difficulty. 
Other users may have had 
similar problems but have not 
been given a replacement or 
not even tried it. It may be 
worth while checking the serial 
number and pursuing a 
complaint because this 
problem could cause severe 
irritation. 

Thave not included the 
shop’s name just in case the 
information they gave me was 
inaccurate. 

Finally, I would like to say 
that I consider the QL to be by 
far the best micro on the 
market and Iam particularly 
pleased with the word 
processor. This letter was 
written on Quill, with a Taxan 
Kaga K910 printer. 

Tain Begg 
Sheffield 





Question Time 


You may be interested in the 
following point. Pressing 
CTRL and F5 will freeze/ 
unfreeze any action on screen. 
This is useful in cheating at 
those rare games and for 
listing purposes. 

I would be grateful if you 
could answer the following 
queries: 

1) What are the rates for 
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What am I bid for this fine QL Master by Easel after Matisse! 


reader’s programs? 

2) What is the best RS232 
printer under £200? 

3) Quill 2. Sinclair says only 
those users who joined QLUB 
will receive updates. Perhaps if 
enough users got together 
(through a user group) they 
could pressurise Sinclair to 
give a free update. 
Isuccessfully pressurised 
Acorn to give me a free update 
of my BBC O.S. 0.1, toan O.S. 
1.2. Perhaps the magazine 
could help place pressure on 
Sinclair? 

4) Does Sinclair Research ever 
answer the phone? 

A Fullen 

Durham 


Our rates are calculated in 
relation to the number of 
columns per page and apply 
equally to articles and 
programs. They are as 
follows: 

£100 3Column full-text 
£120 4Column full-text 

As regards an RS232 
printer the Brother HR5 at 
£160 would be the ideal 
choice. However, if you 
shop around you should be 
able to pick up a Brother 
M-1009 for £200 which 
though it requires a printer 
interface affords a vast 
improvement in print 
quality and performance. 

In response to your 
thoughts about 
pressurising Sinclair we 
wish you luck but feel that 
no precedent exists 
whereby the receiver of 
freebie software is by rights 
entitled free updates in 
perpetuity. 

Finally, with BT now 
privatised we hope that 
communications will be 
improved to the point where 
Sinclair’s telephones will be 
able to cope with the 
pressure from QL users. 
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SKETCH PAD 


PARALLEL PRINTER 
INTERFACE £34.90 * 


JOYSTICK ADAPTOR £ 5.90 x 


£14.90 x 


SKETCH PAD 


A graphics design package allowing the 
user to create high resolution full colour 
pictures and diagrams using the cursor 
keys or a joystick. Features include:- 


* Screen dump to any Epson compatible 
printer. 

* Microdrive save and load of screens. 

* Use of stipple gives a vast range of 
colours. 

* Graphics and text can be freely mixed. 

* Automatic drawing of many shapes. 

‘ Filling of regular or irregular shapes in 
any colour. 


* Drawings saved on microdrive can be 
redisplayed from within any Super- 
Basic program using simple procedures 
supplied on microdrive. 


Some applications include:- 
* Labels »* Signs * Flow Charts 


* Graphics for Games 


* Artists Drawing 
FOO III IO tok tok 


SPECIAL OFFER 
SKETCHPAD PLUS JOYSTICK 
ADAPTOR £19.95 


OOOO OF 


PARALLEL PRINTER 
INTERFACE 

Simply plugs into the ‘Ser |’ port of the 
QL .and any centronics compatible 
printer (eg:- EPSON, CANON, OKI, 
Kaga, Juki etc.) 

works with PSION software and requires 
no special commands. Full instructions 
included. 


JOYSTICK ADAPTOR 
Enables any Atari compatible joystick 
(eg: Kempston, Quickshot) to be used 
with the QL joystick ports. 


All-prices include V.A.T. and p & p within the U.K. Make cheques or postal orders payable to Sigma Research. 


Fhe fast- mn t-)-1-!-] eels oe 


231 Coldhams Lane, Cambridge CB1 SHY. 








Centronics Parallel Interface for QL" 


CST announce the QU Centronics Parallel 
Interface for Sinclair’s QL- available NOW for only 


ORDER FORM 


CHEQUE/P.O. NO 


Name 


Phone 
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Cambridge Systems Technology can provide the missing link for your QL. 
The CST Q-PI is a Centronics Parallel Interface offering full Q. DOS device 
driver software. It will connect your QL to the wide range of printers and 
plotters which use the standard Centronics interface, and is fully 
compatible with Sinclair-supplied PSION software. 








Please send_______Q-Pl units @ £86.25 incl VAT £ 
(and)_______Centronics cables @ £11.50 each incl g 
(add post & packing @ £2.25 incl per unit) & 

£ 


REMITTANCE TOTAL 
Address 





Postcode 
Date of Order. 


CUT AROUND BROKEN LINE AND DESPATCH WITH YOUR REMITTANCE TO: 
CAMBRIDGE SYSTEMS TECHNOLOGY 30 Regent Street Cambridge CB21DB 


QU3/85: 
fee ee eee 


PLUS VAT 

















*QL IS A TRADEMARK OF 
SINCLAIR RESEARCH LTD. 











This month Adam Denning 
goes backstage to look at 
number systems and processor 
architecture. 














Why program in machine code? Why 
indeed, when the QL is already 
well-supported with excellent lan- 
guages such as Pascal, BCPL and 
Lisp? Well, there are a number of 
reasons. Programs written in high 
level languages generally have to be 
compiled or interpreted, which 
means that a user will have to lay his 
hands on an appropriate program to 
do this. Furthermore, a compiled 
language needs a ‘library’ of routines 
to take care of all the machine specific 
tasks such as Input and Output, 
screen handling and so on. Addi- 
tionally, an interpreter is a large 
program which must be in the 
machine along with the program 
which it is intended to interpret. Both 
these options therefore require a 
great deal of memory for what may be 
only simple tasks. Finally, a compiled 
language only starts to come into its 
own in terms of memory efficiency 
when the program being compiled is 
of a substantial length (ie another 
compiler) and interpreted language 
suffers from being extremely slow. 
Machine code, then, is not just a 
compromise. Programs are inherent- 
ly compact and extraordinarily fast 
being written, as it were, in the 
computer’s native language. The 
drawback, however, is that machine 
code programming is often thorough- 
ly tedious. There are a number of 
operations which may be performed 
in a single high level language in- 
struction which will need a whole 
group of machine code instructions. 
Machine code, as we’ve just said, is 
the machine’s native language. This 
raises another problem. Different 
computers use different microp- 
rocessors. For example, the IBM PC 
uses the 8086, the BBC Micro uses 
the 6502, the Spectrum uses the Z80 
and, of course, the QL uses the 68008. 
So, just as the internal architecture of 
the processors differs, their machine 
codes have little in common. Unlike a 
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high level language, which remains 
approximately the same over many 
computers, a machine code is specific 
to a particular processor and only the 
most basic programming principles 
are common to more than one 
machine language. 


Bin, Den or Hex : 


An understanding of number sys- 
tems underlies all machine code prog- 
ramming and provides us with a 
useful starting point. A number sys- 
tem is quite simply the way in which 
we choose to count. Most of us tend to 
count in tens, presumably because (in 
line with EEC regulations) we have 
ten fingers. This is known as the 
denary system, or base ten. Compu- 
ters, on the other hand, count in twos. 
This is called binary, or base two. 
They do this because a microp- 
rocessor is a very large collection of 
electronic switches, which can only 
ever be in one of two states — “on” or 
“off’. As there are two states the 
binary system is a natural choice, but 
for us it’s inconvenient to say the 
least. A binary number consists of a 
series of ones and noughts, each 
column being twice as significant as 
the one to its immediate right. For 
example, in denary, we talk of units, 
tens, hundreds, thousands and so on, 
and here each one is ten times more 
significant that its predecessor. Each 
column represents a power of ten, 
from 10/0 up to whatever we choose. 
For example, 


12345 = (1*1044) + (2%1043) + 
(3% 1042) + (4*1041) + (5*1040) 
= 10000 + 2000 + 300 + 40 + 5. 
Binary is much the same, with ten 
being replaced by 2. So, decimal 103 
in binary is 1100111. 1100111 = 
(1% 246) + (1%245) + (O%244) + 
(O%243) + (1% 242) 4+ (1%241) + 
(1*240) 
103 = 644+ 82+0+0+4+4+2+411. 
The problem with binary is that as 
there are only ones and noughts in 
each number, it’s fairly difficult to. 
immediately distinguish between 
1100111 and 11100111 (the first is 
103 in decimal and the second is 231). 
These numbers are radically diffe- 
rent, so it’s easy to make mistakes. 
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And mistakes are fatal! Most prog- 
rammers therefore choose a_ very 
sensible compromise, base 16. This is 
called hexadecimal, or more normally 
hex, and as 16 is a power of 2 things 
come together rather nicely. As 16 is 
24, it follows that each group of four 
binary digits can be replaced by one 
hex digit to get the same effect. As 
there are 16 distinct digits in hex, 
numbers are obviously shorter to 
write. down and mistakes are less 
likely. As hex needs to be able to 
represent numbers between 10 and 
15 as single digits we use the letters 
A,B,C,D,E,F. 





Decimal Binary Hex 
0 0000 0 
1 0001 1 
2 0010 2 
3 0011 3 
4 0100 4 
5 0101 5 
6 0110 6 
7 0111 7 
8 1000 8 
9 1001 9 

10 1010 A 

11 1011 B 

12 1100 C 

13 1101 D 

14 1110 E 

15 1111 F 

16 10000 10 

















Terminology 


i lection 
chine code... a0 ; 
oat ae numbers which a eae) 
puter understands and can 
on directly. 
‘Nsembly janguage .-- ae 
system of mnemonics use °y 
bumans as the easiest way 
represent machine code. oe 
A mnemonic... 4 i Lantie 
group of letters wines ee 
more easily remembere ee 
sentation of a machine 
Pgebeion file ach a file contain- 
ing assembly Tanguaet — 
ssembler . . - 8k 
ae file and converts it Cae 
the true machine code, ca 
ject code. ; 
Bho code is the code which 


the processor actually runs. Its 


appearance is almost entirely 


meaningless to us. 
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An understanding 
of number systems 
underlies all machine 
code programming and 
provides a useful 
starting point. 


So the first principle of machine code 
programming is: LEARN HEX, 
LEARN IT WELL AND LEARN IT 
FAST! 
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ADDRESS REGISTERS 





SYSTEM BYTE] USER BYTE 


Throughout the rest of the series, a 
hexadecimal number will be shown 
by being prefixed with a ’$’ sign, 
binary numbers will have a ‘%’ pre- 
fix, and decimal numbers will be 
shown as normal. The reason for this 
is that the prefixes above are those 
recommended by Motorola, the mak- 
ers of the 68008, for use in their and 
other assemblers. 


68000 Blueprints 


As machine code is processor specific, 
nothing can be done without a 
rudimentory knowledge of how the 
processor is laid out. the QL’s 68008 is 
one of the Motorola 68000 family, so 
it has the same general architecture 
as the rest of the family. Examining 
figure 1 we see that it has a lot of 
things called registers. A register is 
an area of memory inside the proces- 
sor which can be both examined and 
altered. Most of the 68000’s are 32 
bits long, but what does that mean? 

We've just discovered that proces- 
sors talk in binary, and that each 
digit represents a switch inside the 
processor which can be either on or 
off. It’s conventional to describe off as 
binary 0 and on as binary 1, and each 
particular switch is known as a 


by the processor whenever certain 


binary digit. This is generally 
-abbreviated to bit, so a register which 
is 32 bits long can hold 32 binary 
digits. As each of these bits can 
notionally form part of a binary 
number, we know that a 32 bit 
register must be able to hold com- 
binations of digits which can be taken 
to represent numbers from 0 to 32 
binary digits long. If all 32 bits are set 
to ones then the number is 
%1111111111111111111111111111 
1111. This means that one 32 bit 
register can hold any number be- 
tween $0 and $FFFFFFFF, which is 
a gigantic range (over 
4,000,000,000). Likewise, 16 bit reg- 
isters can hold numbers between 0 
and 65535 and 8 bit registers can hold 
numbers between 0 and 255. There’s 
a relationship here: a register of 
length x can hold 2x different num- 
bers, and as the first number is 
always going to be zero, the range of 
numbers which can be held in a 
register is 24x — 1. 

There are instances when we are 
going to want a register to imagine 
that it’s 32 bit, 16 bit or 8 bit, so these 
numbers are very useful to remem- 
ber. Perhaps they’re clearer in hex: 
8 bit: $00 to $FF 
16 bit: $0000 to $F FFF 
32 bit: $00000000 to $FFFFFFFF 


Moving on we notice that 68000 has 
eight data registers, DO to D7, and 
seven address registers, AO to A6. 
There isn’t actually much difference 
except that data registers can be 
treated as anything from 1 to 32 bits 
long, depending on the application, 
while address registers can only be 
treated as being 16 or 32 bits long. 
There are also a few miscellaneous 
operations which can only be carried 
out on data registers. Address regis- 
ters get their name because they are 
often used to hold memory addresses. 


Flying the Flag 


We then notice that there are two 
further address registers, both called 
A7. These are the stack pointers, one 
for each of the processor’s modes. 
We'll discuss stacks and modes a little 
later. We find that the 68000 has a 16 
bit status register, which is a very 
useful part of the processor. The 
status register contains numerous 
flags which tell us about the current 
state of the processor. One or more of 
these flags is altered automatically 





“a 





operations occur, so by examining the 
flags we can tell what happened. 
The flags are shown in figure 2. 


1514131211199 876543214 
_IxIN[Z[v Ic] 


THE ‘USER’ BYTE 





THE ‘SYSTEM’ BYTE 


T = Trace mode flag Extend flag 
Negative or sign flag 


Zero flag 


S = Supervisor mode flag 
ls Interrupt mask 


ou ow ot ow 


Overflow flag 


O<NZ&X 


Carry flag 


The Zero flag is set (turned on) 
whenever an operation gives a result 
of zero, and reset (turned off) other- 
wise. 

The carry flag is used to indicate 
carry in additions and the borrow in 
subtractions. 

The sign flag is tied up with two’s 
complement arithmetic, which we 
haven’t got to yet. 

The extend flag is used when we want 


to perform operations in more than, 


32 bits. We hardly ever use that one. 
The other flags are not important just 
yet. 
The last register is the program 
counter. This is used by the processor 
to point to the next instruction which 
it has to get from memory. 


| Memory Map 


Now we can talk about memory 
organisation. A processor needs to fol- 
low its instructions to do anything at 
all, and on the QL many of these are 
held permanently in read only mem- 
ory (ROM). This ROM contains the 
SuperBasic interpreter, the QDOS 
operating system and the device 
drivers for microdrives, serial lines, 
the local area network and so on. 

ROM is a special form of memory, 
which as its name suggests can only 
be read from. (We are at liberty to 
attempt to write to it - POKE from 
Basic will do the trick — but it will 
have no effect.) This sort of memory 
does not lose its contents when the 
power is turned off. On the QL, ROM, 
extends from memory locations with 
addresses from $0000 to $C000, and 
there’s space for a bit more. 

The other sort of memory on the 
QL is RAM. This stands for Random 
Access Memory, but it’s probably 
easier to understand if we call it read/ 
write memory, as it can be written 
to and read from. This is where all our 
programs and data are stored. When 
the computer is switched off, all the 





As machine code is 





processor-specific, 





it’s important to 





understand how the 





QL’s 68008 processor 





is laid out. 


data in the RAM is lost — forever 
unless it has been written to microd- 
rive. 

On a standard QL, RAM extends 
from memory locations with addres- 
ses from $20000 to $3FFFF, with 
that between $20000 and $27FFF 
mapping out the screen, immediately 
followed by an area known as the 
system variables. These are just 
memory locations used by the system 
to keep track of everything it is up to. 





READ/WRITE 












MEMORY 
(ROM AND 
RAM) 


VRS Ws 
* a 
DATA BUS 


Now, when we execute a machine 
code program, which starts at 
address ‘x’, the processor puts the 
value of x into the program counter. 
This address is then put onto the 
address bus, and a wire from the 
68000 called the read/write line is set 
to a particular value. Things are 
wired in such a way that when this 
happens, the memory location at 
address x puts its contents onto the 
data bus, which on the 68008 is 8 bits 
wide. The processor reads this, stores 
it, and collects the contents of the 
next memory location as well, as each 
68000 instruction is always at least 
16 bits long. The instruction is then 
executed, reading from and/or writ- 
ing to memory if required. During all 
this the program counter is updated 
so that when this instruction has 
finished it will be pointing to the next. 

While we’re here, it’s useful to 
know a bit of jargon. We’ve already 
talked about single bits, and it 
(almost!) follows from this that a 
collection of eight bits is called a byte. 
Further, two bytes are called a word 
and two words are called a long word. 
(Coincidentally, half a byte is called a 
nybble.) 


A fundamental concept in computer 
programming is that of the stack. 
This is an area of RAM which is used 
both by the system and by the 
programmer to temporarily hold 
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items of information. The most com- 
mon application is during the CALL 
and RETURN mechanism. Without 
going into details just yet, a call is 
equivalent to a Basic GOSUB and a 
return is equivalent to a Basic RE- 
TURN statement. The microp- 
rocessor uses call and return a lot. 
When it calls a subroutine, it needs to 
keep a record of where it came from 
before the call so that when it encoun- 
ters the return (RTS) at the end'of the 
subroutine it can resume where it left 
off prior to the call. This is where the 
stack comes in. At any one time, one 
of the A7 address registers is pointing 
to an area of memory designated by 
the programmer as suitable for a 
stack. When a call instruction is 
executed, the .processor puts the 
address of the instruction after the 
call onto this stack and adjusts A7 to 
point to it, so that when the return 
comes along it just pops it off the 
stack, puts it in the program counter 
and carries on. 


This obviously means that if we 
alter the stack pointer in between the 
call and the return, things will be well 
up the creek. It’s amazing how many 
programs go wrong because of an 
unbalanced stack! It’s perhaps odd to 
discover that the stack pointer is 
decreased each time an entry is put 
on it, so that it grows downwards in 
memory, but it’s a very common 
technique and just about every other 
microprocessor does the same thing. 
One odd thing about the 68000 
though is that its stack pointer al- 
ways points to the current stack 
entry, while most other processors 
make it point to the next free loca- 
tion. The reason for .the 68000’s 
oddity is that it allows the program- 
mer to use any of the address regis- 
ters as a stack pointer, and various 
ways of manipulating the stack are 
available. You soon get used to it, and 
it’s not good practice to play around 
with return addresses on the stack 
anyway. 

All that we’ve discussed so far has 
been fairly easy to understand, but 
the 68000 is a powerful microp- 
rocessor and QDOS is a powerful 
operating system, so it’s inevitable 
the pace will quicken and matters 
become more complex. Next month 
we'll look at the types of operations 
one can perform in machine code 
programs, and we'll discuss the 
68000’s modes and exceptions. Then 
we can start to program! 
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The QL as a universal terminal, 
and host to mini and mainframe 
computers, explored by 

Adam Denning using BCPL 

and machine code. 

















With built-in serial ports the QL 
seems an ideal candidate for use as a 
terminal to larger mainframes. Over 
the next few issues of QL User we will 
develop a full terminal emulation 
program which may be used to com- 
municate with most machines pro- 
vided they support an RS232 connec- 
tor (or suitable interface). 

The emulator is written largely in 
BCPL, but there are a few extensions 
to that language’s library written in 
machine code. There is also a subsidi- 
ary clock which runs concurrently 
with the terminal emulator. As the 
program is compiled, it is as fast as 
could be desired and will of course 
happily multi-task. A word of cau- 
tion, as the program occupies almost 
the entire QL screen area, any prog- 
ram running with it will have to 
make minimal use of the screen! 


The first thing we have to discuss is 
how to add machine code routines to 
BCPL. As far as we know, Metacom- 
co is the only company producing a 
BCPL compiler for the QL, so all the 
techniques developed will apply ex- 
clusively to this product. 

Extensions to the library will in- 
clude two general purpose routines, 
MOVE and BACKMOVE, along with 
more specialised functions and proce- 
dures to take advantage of facilities 
unique to the QL. One of these is 
called GETKEY, is now included as 
standard in the BCPL package and 
may be ignored. 

The extensions are in four files, 
each about 130 bytes long. The first 
file (‘mc1_lib’) contains these 
routines: 

BAUD(Baudrate) ... this sets the 
Baud rates of the serial ports. 
anyinput := PENDING(channel- 
timeout) . . . This checks the speci- 
fied channel for input and returns 
TRUE if there is. If the channel being 
checked has reached end of file then 
the global variable RESULT? is set to 
the QDOS error code err.ef, meaning 
‘end of file’. This routine is fun- 
damental to the terminal. One of its 
uses is to automatically log the ter- 
minal on if it detects input on the 
specified serial port. 

keypress := GETKEY (timeout). 
Very similar to INKEY, except that it 
returns 0 if no key was pressed in the 
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specified timeout period and 
RESULT2 then holds the QDOS 
error code. 

The second file (‘mc2_lib’) holds 
routines for moving areas of memory: 

MOVE(from,to,words) . . . This 
procedure moves ‘words’ (BCPL 
words — four bytes) from the BCPL 
from address to the BCPL to 
address. A BCPL address is a long- 
word aligned quantity representing a 
valid machine address, shifted right 
twice (ie divided by 4) to make it a 
long word address as opposed to a 
byte address. This is because BCPLis 
designed around the concept of a 
memory cell which is of an arbitrary 
— in the case of the QL this is 32 


»B ACKMOVE(from, to,words). 
This is identical to MOVE except that 
memory is moved from the highest 
address down, making it useful for 
moving the contents of a vector up 
within the vector. 

MOVEBYTE(frombyteaddress, 
tobyteaddress, bytes) ... This is the 
same as MOVE except that the from 
and to addresses are real machine 
addresses (‘byte addresses’) and the 
number of units to move is specified 
in bytes. 

BACKMVBY (frombyteaddress, 
tobyteaddress,bytes) . . . This is 
similar to MOVEBYTE except that, 
as with BACKMOVE, memory is 
moved from the highest address first. 
This is very useful for dealing with 
strings, as we shall see. 

The third file (‘mc3_lib’) puts 
sound into the hands of the BCPL 
programmer. 

SOUND(soundvector)...Gener- 
ates sounds as specified by the 8 
words of soundvector Ge LET 
soundvector = VEC 7) formed in the 
following manner: 
soundvector!0 := pitch 1 (low 8 bits) 
soundvector!1 := pitch 2 (low 8 bits) 
soundvector!2 := interval between 
steps (low 16 bits) 
soundvector!3 := duration of sound 
(low 16 bits) 
soundvector!4 := step between 
pitches (low 4 bits) 
soundvector!5 := wrap (low 4 bits) 
soundvector!6 := randomness (low 4 
bits) 
soundvector!7 := fuzziness (low 4 
bits) 

NOSOUNDO... 
being generated. 

The last file (mc4_lib’) si the most 
complicated and one of the most 
useful. It contains routines for QDOS 
job control: 

loadaddress := CREATEJOB 
(code length, datalength) ... This 
function creates a job as defined by its 
two parameters. The BCPL address 


Kills any sound 



























































at the start of the area alloc 
returned as the result and the job ID 
allocated by QDOS is in RESUL! 
the job could not be created then tl 
result is zero and RESULT2 contain; 
the QDOS error code. Note specific 
ly that the result is a BC 
address’, making it ic 
FILE and so on. 
result := AC 
priority,timeout d i 
the specified job at the. specified 1 
priority (between 0 and 1’ 
result of 0 indicating s 
negative error code bei 
otherwise. The timeout is e 
which case the job is activate a 
control is returned to the involebe 1 
program, or —1 in which case the 
activated job takes over until its | 
termination when the BCPL prog- 
ram takes control again. Other 
values for the timeout should not be 


used. 
result := PRIORITYGobID, | 
priority) ... This alters the priority | 


of the specified job to the given value | 
(between 0 and 127) and returns 0 if 
successful and a negative QDOS 
error code otherwise. 

result :=KILLJOB(jobID) .. . 
This routine kills the specified job, 
returning 0 if successful and a nega- | 
tive QDOS error code if not. It uses the 
QDOS MT_FRJOB trap to ensure. 


success! 

result :=SUSPEND(jobID, 
timeout) . . . Suspends the specified 
job for the specified number of frames 
(20ms intervals) between 0 and 
32767 (or —1 for infinite suspension). | 
This function returns 0 if all went OK | 
and a negative QDOS error code if | 
not. 

result :=RELEASE(jobID)... 
Releases a previously suspended job, |. 
returning zero if successful and a | 
negative QDOS error code if not. | 


Moving on, to extend 
language we must come 


~ 


a fundamental BCP. 


and functions and 
for use by a prog 
values are held i 
then the program 
sections and joi 
end. The same 
applies to. 
routines — if 
global then 

them. The 
cludes the link 
ram sections to 
product — a 












lot ooraplete’, which 
turning FALSE (0). 
hind of fle” hough, we 


into RESULT2 before 





Loc OBJECT STAT SOURCE STATEMENT 
















1 Three BEPL routines to add to the existing library, 


2 # BY Adae Denning (c) Copyright 1994 Adam Denning 


in the global 
as routine 


4 # BAUD is Passed one paraneter and changes 
of course, 


5 # specified value, It ig global 100 
6 


7 # GETKEY is Passed one parameter (the 
8 * fron the current channel in that tia 


eout. It returns ¢ if no key wag 
9* Pressed, and RESULT? will hold the e 
10 


rror code. It ig global 104 


11 * PENDING is passed to Parameters (a streap and a timeout) and returns 
12 # (FALSE) if no input is Pending on that Channel, { (TRUE) i¢ there is 
13 ¢ Pending input, ¢ EOF then err,e¢ in RESULT2, It ig global 102 

14 








20064 15 BAUD Eau 100 
or mcl_lib 20065 16 GETKEY Egy 101 
: 20066 17 PENDING — Egy 102 
: in the =0034 18 CIs EQu 52 
" oo epee 20008 19 RESULT2 Eau 10 
: See 20 
y 4. This is ae =0000 21 10.PEND Ey g 
4 directive whicl | 20001 22 10_FBYTE EQy ! 
t instruction is | =0012 23 MT_BAUD Egy #12 
ee FFs seme a 
code produce : *. 
I “niet 0000’ 0000 OIF 27 FIRST DCL (ENDMOD-FIRST) /4 
tion indepen- 28 
calls a func- 0004" 2 CHOP gg 
30 
7012 31 BAUDHERE MOVEQ #NT_BAUD, DO 
4E41 32 TRAP il 
4ED6 33 MP (A) 
34 
5 CNOP 0,4 
3% 
48E7 00co 37 BKEYHERE MDVEH.L AO/AL, ~(A7) Preserve registers 
2601 38 MOVE. L D1,D3 put timeout in D3 
226A 00D0 9 MOVE. L (C1584) (A2),Al get streae contro} block address 
2051 40 MOVE. L (Al) ,A0 sand the channe] 1D 
7001 cy HOVEQ #10_FBYTE, Do Read a byte 
| 4E43 42 TRAP #3 
| 001¢' 4ago 43 TST.L DO Error? 
| COLE’ 4704 4 BEQ,§ SOTKEY lo 
| 9020' 2549 0028 45 MOVE. L DO, (RESULT2#4) {A2) Yess save error code in RESULT? 
| 0024" 7299 44 MOVEO = 40, and clear return value 
| 0026: 0281 0000 ooFF 47 BOTKEY ANDI.L aSFF DI returning byte only 
002¢' acnr 0300 48 OVEN, L (A7)+,A0/A4 retrieve registers 
| 0030" 4ED6 49 JP (Ab) return 
50 
0034" 5 CNOP 0,4 
52 
0034'  4g¢7 00C0 53 PENDHERE MOVER. L AO/AL,-(A7) Preserve registers 
0038' 2402 5 MOVE. L 02,03 Put tiaeout into D3 
003A" 2244 55 NOVEA,L D1,Al Put FCB address in Ay 
003C' 2054 3% MOVEA,L (Al) ,A0 «read channel ID in Ao 
O03E' 7000 57 NOVEQ #10_PEND, Do Check input streap 
0040' 4543 58 TRAP #3 
| 0042" 7294 59 MOVEQ #1,01 get ready to return TRUE 
0044' 4ngg 60 TST.L Do ceslinless an error occured 
0046' 670¢ 61 BEQ.S YESPEND seoWbich it didn't here 
0048 7299 62 NOVEQ #0,D1 but return FALSE here 
004A' ocao FFF4 63 CHPILW #ERR_EF, DO EOF error? 
O04E' 4404 64 BNE.S —_YESPENp 
0050' 2549 0028 65 MOVE. L DO, (RESULT2#4) (42) Store error return 
0054 acne 0300 66 YESPEND NOVEM, L {A7)+,AQ/AI retrieve registers 
058° 4eng 67 MP (AS) and return 
68 
005c' 69 CNOP 0,4 
70 
005’ 0000 0000 71 DC.L 0 


| 60° 0000 0044 0000 0004 72 DCL PAUD, (BAUDHERE-F1RST) 

| 068° 009 9065 0000 coor 73 DCL GETKEY, (BKEYHERE-FIRST) 
9070" 0000 0044 0000 0034 «74 DCL PENDING, (PENDHERE-FIRST) 
9078’ 0000 0034 75 CIs 


uf) 
77 ENDMOD — END 





the serial ling baud rate to the 


timeout) ang returns the character read 
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long word, followed by r ines bein; 
te tee chee Ton the start of the | used. The easiest way of doing this is 
module of each routine. The last en- | by adding this to libhdr. 
try is the number of the highest baud: 100 
global referenced. getkey. 101 

Once this has been assembled each pending: 102 

routine can be incorporated into 
other programs by telling them the 


global numbers of the routines bein 












in the global declaration section, and 
alerne the manifest constant UG to 


|LISTING2 103. As each of the files mc1_lib t 
| Loc OBJECT STAT 





















































































































































| SOURCE STATEMENT 
1 # Four BCPL routines to add to the existing library. 
| : * By Adam Denning (C) Copyright 1984 Adam Denning 
4 # MOVE (from,to,words) as in Richards. Global 103 : 
5 # BACKMOVE(from,to,words) as above. Global 104 : 
68 MOVEBYTE (fronbyteaddress, tobyteaddress, bytes) as above. Global 105 = > 
7t BACKMVBY (rombyteaddress, tobyteaddress bytes) as above. Global 106 | 
a 
20067 9 MOVEWD EQU 103 
20068 10 BACKHOVE Eau 104 j 
20069 11 MOVEBYTE EQU = 105 
20068 12 BACKMVBY EQU 108 
13 
| 0000 0000 0023 14 FIRST = DCL = CENDMOD=F RST) /4 
| 4 15 
| 0004" 16 CNP O44 
| 17 
| 0004" E599 18 WOVEHERE LSL.L  2,D1 
0006" E58A 19 LSL.L 02,02 
0008" 4A83 20 TST.L D3 
! 000A’ 4 70C 21 BEG.S © MOVEOUT 
000C' 5383 2 SUBO.L — #1,D3 RCE STATEMENT 
| OOOE’ 2641 3 MOVEA.L —D1,A3 BIECT STAT 0 mes 
0010 2842 m4 MOVEA.L 02,04 Loc to add to the existing library. 
| E ’ tines i 
0012" 28pB 25 MOVELOOP MOVE.L — (A3)+, (A4)+ A agile oe: Copyright 1984 Adaa Denning 
0014" S1CB FFFC 2% DBRA D3, MOVELOOP ak ep ees? ified sound. Global 107 
0018' 4EDS in NOVEOUT JMP (Ab) : # SOUND(soundvector) ieee pas sade, Global 108 
() kills any sound cur 
otc 2 CNP 4 5 NOSOUND 
30 6 7 
EQU 10 
oo’ E589 31 BACKHERE LSL.L 92,01 7 SOUND 
| ’ 108 
OO1E’ ES@A 32 SLL 42,02 oe aie id 
0020 4A83 33 TST.L DB $1 
0022" 4710 34 BEQ.S —BACKOUT Sai A ee i ae 
0024" 283 35 ADDL = D3,DL ‘kL _CENDNOD-F1 
0026" D483 36 ADDL 3,02 000" 0000 O01E 2 FiRst DC 
0028 5383 37 SUBQ.L 1,03 cHop (4 
002A’ 2641 38 MOVEA.L —DL,A3 ut tor byte address 
1 002c’ 2842 39 NOVEA.L D2,A4 al A oD MERE LSLAL 82,01 ihe 
0O2E’ 2923 40 BACKLOOP MOVE.L — -(A3) ,-(A4) soa £589 Lee MEAL Did eee oitent. inte right place 
0030’ SICB FFFC " DBRA D3, BACKLOOP porimern B HOVE.B — S(AS) ,6(A3) ove Unterval into right place 
0034" 4ED6 42 BACKOUT NP (Ab) o0e* 1748 0003 0006 : WOVE.W 10483) ae Rove duration into right place 
3 ; 0A 0008 14403) ,10 
Q0OE' 3748 0 sh MOVE. W et step 
bi 3 om. oF Qo14'  376B OOOE 000A 2 MOVE.B 19(A3) DI into high nybble of D1.B 
0038" 4483 a EHERE TST mg ees 2 _ ane nN and wrap into low nybble 
| 003A’ 470C a anus BEu8 init QO1E’ E909 - 23 mae per store in right place 
003’ 5383 rT SUBQ.L 41,03 ee cae - 2h 27103) D1 daha mere 
| OOSE’ 2641 " HOVEA.L D1,A3 ecipe lee % ‘heen 3 into high ny pble 
| 0040' 2842 50 NOVEA.L 2,A4 0028’ 1228 001 2b nog 31103) nN and fuzz into ae ft 
. ’ "£909 B ‘ ight place 
| 0042" tape. 51 BYTELOOP MOVE.B  (AS}+, (A4)+ pied 1208 OOF ~ WOVE.B DL 1348) aie Deas cee 
| 0044" SICB FFFC 52 DBRA ~——_—D3, BYTELOOP 9032" 1741 0000 a MOVE.W  #8100,14(A3) tore ‘sound’ and ‘8 paraeeter 
| | 0048" eng 53 BYTEOUT NP (Ab) Qos’ 3770 0100 000E ed MOVE.W #8008, (83) aaa 
|| co: 35 CNP 44 ergo S Os ane all B read as whole bytes 
| a ait ot er 0004 2 DEE aT 1PCOM,DO wend coanand 
| cone atte iad ee nota’ 71 es Mi 
( 
| 0050" p2e3 59 ADDL 03,01 jl ta 35 i 
| 0052" pags 60 ADDL 03,02 al = cNOP Oy4 
| 0054" 5393 6l SUBQ.L 41,03 mae : 
| 0056" 2641 82 MOVEA.L —DL,A3 L _ K_SOUND,A3 
0058’ 2842 83 HOVEA.L D2,A4 | ATER 0008 39 KILLHERE pai #4T_TPCOM,D0 kill sound 
005A’ 1923 $4 LOOPBYTE MOVE.B — -(A3),~(A4) 0050’ 47 10 i) ne 
O05c’ SICB FFFC 65 DBRA D3, LOOPBYTE ah _ hue 
0060’ 4ED6 as QUTBYTE —JMP (Ab) aa. ae _ i “iL sound’ comand 
, ' s' 
0064 68 CNOP 0,4 aba a . SOUND or 0 a ee 
0064" 0000 0000 7 ML 0 La * Mb BR oS 
i 0068’ 0000 0047 0000 0004 7 DC.L MOVE WD, (MOVEHERE-FiRST) | 005C’ 9 "7 cue Od 
| 0070" 0000 0068 0000 oi 7 DC.L BACKHOE, (BACKHERE-FIRST) a 48 
| 0078" 0000 0049 0000 0038 73 DC.L —-MOVEBYTE, (BYTEHERE-FirsT) | e ML | 0 
| 0080" 0000 0068 0000 cose 74 DC.L —_BACKMVBY,, (BBYHERE-FIRST) vos’ 0000 0000 50 aL SOUND (900 HERE-FIRST) | 
0088’ -0000 0000 5 DL oud" 0000 006B 0000 0004 a DELL NOSOUND, (KTLLHERE~ 
7b Q04C’ 0000 006C 0000 0050 LOCO 
| 008c 77 ENDMOD END 5074" 0000 0000 a 














LISTING4 
SOURCE STATEMENT 
5 
(NP gg 








LOC OBJECT STHT 
1 # Six BCPL routines to add to the existing library. 
2 & By Adam Denning (C) Copyright 1984 Adaa Denning | 0030" 700a 5 
Ne q 0032° 
4 # loadaddress t= CREATEJOB(codel ength,datalength) returns the job ID in | 0034" He . ACTIHERE MOVEQ ' 
5 & RESULTZ. In case of error, the result is zero and the error code isin | | 0036 9i¢g 59 TRAP ee 
_ | 0038" 4D 60 MOVE.L — p0,D4 


6 # RESULT2. Global 109 
7 # issuccessful := ACTIVATE (jobID priority tiaeout) returns zero if OK or 


8 # the GD0S error code. Global 110 
9 # issuccessful t= PRIORITY (jobID priority) returns zero i 
10 # QD0S error code. Global 111 

ID) returns zero if OK or the 


11 # issuccessful 3= KILLIOB( job 

12 # code. Global 112 

13 & issuccessful := SUSPEND ( jobID,tiaeout) returns zero if OK or the @D0S 
13 


14 # error code. Global 1 
15 # issuccesstul %= RELEASE(jobID) re 


$ OK or the 






QD0S error 
65 
PRIQHERE MOVEO guppy 
TRAP gy i 







| 0042" 910g 
68 NOVELL pg 
SUPA. ag’ay 
' rT) 


UMP (Ab) 











turns zero if OK or the QDOS error 





CNOP 0,4 























































16 # code. Global 114 
7 | 
=000A 18 RESULT2 EU 10 0048' 4g¢ 2 
=006D 19 CREATEJGB EQU 109 o04c’ 7004 me 73 KILLH 
2006E 20 ACTIVATE EAU 110 OO4E' 4E 44 74 MERE MOVEN.L 0-82, -( 
2006F 21 PRIORITY EQU 11 0050° 2799 5 MOVEO = gut Fai0R,p 
20070 22 KILLJOB EGU 112 0052’ 4cDF 0709 76 ina el 
20071 03 SUSPEND EWU = 113 0056" 4806 7 MOVE.L 0,1 
30072 24 RELEASE EGU 114 78 ae (A7)+,A0-A2 
5 0058" "7 P (Ag) 
2000! 2b MT_CUOB EQU 1 80 
oo a a fen ae : — 
; i "4857 82 Su 
20009 29 MT_RELIB EQU 9 00SE’ 9309 si be SPHERE HOVE.L — p2,p3 
20008 30 HT_ACTIV. QU 10 0060’ 7998 84 MOVEM.L —AO/AL, ~(A7) 
=0008 31 T_PRIOR QU i eae AEA 85 sum Ala’ 
: 32 64" 2200 86 @ — #NT_sus, 
| ooo’ 0000 0020 X3 FIRST DC.L_——_‘CENDMOD-FIRST)/4 0066’ 4CDF 0309 87 a ‘ee 
rr 0064" 4ED6 88 OVE.L 00,01 
| 9004" 3 CNOP 0,4 - 89 ad (A7)+,A0/AL 
| 3b ec 90 (Ab) 
| 0004 2602 37 CRTJHERE MOVE.L 02,03 91 A 
| oie 1 eae te it : wr ore 
008° 72F 0 nly ‘4641 93 RELJHI 
| oon’ 4867 00C0 40 HOVEH.L — A0/AL,~(A7) 0070’ 2209 4 oi cig #T_RELJB, po 
| Oe’ 9309 aM SUBA.L AL, Al 0072' 91¢g 95 Ma " 4 
| 0010" 7001 42 MOVEO ©—-«-#AT_CJOB, DO 0074 4ED4 96 ne DO, Dt 
012’ 464 3 TRAP “ 97 ee A0, AO 
0014’ 4A80 ry) TsT.L 00 9078 98 (Ab) 
0016’ 4708 45 pEO.$  J0B_OK ea 9 a 
goie’ 2540 0028 Ab HOVE.L D0, (RESULT2#4) (A2) a 0000 0000 100 0,4 
| otc’ 7200 M7 wove? «0, D1 0000 o0gn o 101 
Rovere 0084" 000 0004 DCL 
ote’ 4008 4a pRA.S © BAD_JOB — 0000 OO8E 0000 o030 102 "wo 
0020" 2841 0028 49 30B_0K —MOVE.L DL, (RESULT2#4) (82) 0000 006F 0000 103 b CREATEJOB, (cRT 
0024" 2208 50 WOVE.L 0,01 0094" 0000 0070 0000 goss 128 CL ACTIVATE, tacrineRe ere” 
002" E489 51 LSR.L 92,0! pial 0000 0071 ee 105 ne PRIORITY, VPRIOHERE Cee 
0028’ ACDF 0300 52 BAD_JOB MOVEN.L (A7)+,AO/AL 0A4" 0000 0072 0000 a bk : KILLJOB, (KILL E-FIRST) 
OOAC’ 00 006C 10 DC.L SI s] HERE-FIRST) 
53 INP (Ab) 100 0008 z IL teal {SUSPHERE-FIRST) 
8 : LEASE, ( : 
00B0' 109 if. RESULT?’ RELJHERE-F1RST) 
110 ENDNOD — END 




















0020’ 4ED6 
54 


used 
ed to transfer $0100 tells it to return no reply routi 
. / nes ar 
pace generate sound’ explanatory > see pobes ge 
quisite QDOS trap routine: : 
See “CREATEJOB uses } 
beegeet 0 _ ameters ilies oo the lomech of sods i oe 
$AAAA tells the 8049 job in D2, the length of its data spa 
e 8049 to treat each | 17 D3 and, unl job is ROM. 
parameter as two nibbles each. resident, Al hon tes ee 
ACTIVATE uses MT_ACTIV, 


It sounds complicated j 
- : plicated but is actual- hi : 
y only tedious! NOSOUND has no| Thole theyteoniy BCH, 
MT IPCOM again) : me 8049 (using PRI ORITY sent by BCPL. 
HPIPCOM again to sum allsounds| which again needs the parameters 
ands to be sent to the 8049: : MO ALLJOM occ ey Ue : 
aS $B ‘kill z : : bs uses 

ae eee 
: land ‘noreply’ SUSPEND. ee MT 5 
These two routines are glob es needs the timeout ir D 
hese two routines are global 107) in Al as there is no ‘release f 

oe change libhdr as soon as| th = es ey 

secemibted the bile. gis 

final file is mc4_lib, shown in | oo a eee ; 



























is capable of just ab- 
and next month we’ 
terminal emulator 
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Available from selected 
WH Smith's and leading 











computer shops 


PANE} Fs] e)(=m Coy | 


#/ e\We also supply printers, monitors, labels, 


(8) TRANSFORM LTD. (Dept. QL ) 


: ZX Spectrum and QL 
Microdrive Storage Box™ 


@ Designed to match QL and Spectrum 


QL Centronics Interface .............. $39.95 
QL Dust Cover ......0.. ce. $5.00 
OL RS 232 LEG o.oo. cidickssivccccncees $10.00 
Spectrum Monitor Connector....... $411.50 





ribbon and listing paper. 


089 283 4783 == 


‘Swatlands, Lucks Lane, Paddock Wood, Kent TN12 6QL. 





modems and other communications devices. 


* BAUD RATE SWITCHABLE 

* CRYSTAL CONTROLLED 

* QDOS and SUPERBASIC compatible 
* Drives any CENTRONICS printer 

* Price £57.50 (d) inc. VAT 


ee 
PRINTER INTERFACE 
QL SERIAL TO PARALLEL CONVERTER 


Switchable baud rate. This is necessary because the baud rate on the two serial ports cannot be set independently, 
and unless you can set the baud rate on serial to parallel converters your printer will be inoperative while using 





NOW AVAILABLE FROM STOCK 
Leads and connectors for use with the QL 
Self-contained, colour matches the QL, full one year 
guarantee, comes complete with 1.5 metres of cable 
(for custom lead lengths see below). 
For custom lead lengths please add £1.15 per extra 
metre of lead required. 





PRINTER SELECTOR 
Capable of taking one QL and up to six printers 
Price £65.09 (d) inc. VAT 


Attention all software houses, Eprom cartridges for the 

QL, ROM expansion slot now available, an ideal way of 
packaging your utility program fast loading/no error and 
saves expense of microdrive cartridge. 

Please consult factory for details. 


How to order by post, enclose cheque/P.O. made 
payable to Care Electronics or use Access. 7 days for 
delivery. 
Please add carriage (a) = £8.00 

(d) = £2.00 


; 
f 
/ 
f 


| TOLPITS LANE, WATFORD, HERTS WD1 8SR. Tel: 0923777155 — sam-tpmsa 


UNIT 14, PEERGLOW INDUSTRIAL ESTATE, OLD’S APPROACH = Ore" 


DON’T BUY A COLOUR MONITOR FOR YOUR QL 
Buy specially converted to run for the QL, Philips 14” 
TV/Monitor at £253 (a) inc. VAT. 


Have your Pye/Philips or Ferguson TX TV converted toa 

TV/Monitor. In house conversion. 

£63.25 (a) inc. VAT. 

Conversion kit £51.75 (d) inc. VAT 

* Resolution better than 585 x 450 pixels 

* Image clarity comparable to leading monitors 

* Includes RGB lead for connecting with QL 

* Conversions carried out at our workshops 
within 2/3 days 


* Please telephone for other makes TABLE 


ENQUIRIES 
WELCOME 





9am-5pm Mon-Fri 


p 
A 
$ 
j 
f 


LD a a a ae ee 
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If youre familiar with a high-level 
language like BASIC, you'll probably 
be surprised to learn that C contains 
no provision for handling strings of 
characters. 

At first this may seem a serious 
limitation. C is, however, not quite a 
high-level language, as we have seen, 
and although the standard library of 
functions does contain some string- 
handling mechanisms, for many of 
the applications for which C is best 
suited, you may need to write your 
own functions anyway. 

Similarly, BASIC hackers are 
often surprised to learn that C has no 
I/O facilities whatsoever, in that no 


commands for I/O exist in the C 


language itself. Again, though, the 
standard library of functions which 
come with every worthwhile C com- 
piler includes a wide range of I/O 
mechanisms — or you can write your 
own if you really want or need to. 

The lack of built-in string handling 
and I/O can be regarded either as 
providing increased versatility or re- 
quiring extra programming effort, 
depending on the application you are 
writing. 

In C, strings are in fact arrays of 
characters, and can be treated just as 
any other type of array. Consider, for 
instance, a simple program which 
allows you to type in a line of text at 
the keyboard and will then print it on 
the screen. We can use two of the 
standard I/O functions for this — 
getchar(), which accepts a single 
character from the keyboard, and 
printfQ, which displays text on the 
screen. The program could look some- 
thing like this: 


main() 

char c, buffer[128]; 
int X$ 

x=0; c=0; 


while (x < 128 && c! = 13) 


c = getchar (); 
if(c!=13) buffer[x] = ec; 
++Xx; 


printf ("%s’ ,buffer); 
exit (0); 
} 





C SERIES 





Continuing our look at 
this elegant language, 
Peter Rodwell discusses its 
handling of strings, arrays 
and simple I/O facilities. 

















First, notice the declaration 
buffer[128]. This is how we describe 
an array in C and it’s not very 
different from BASIC — we have to 
say what type of object is to be stored 
(done with the char type declaration), 
we give it a name (‘buffer’) and we 
must say how large it is so that the 


Pid ns dd wey 
ATES, | ly ‘s 
ay iP — 
aT aD Ht 
. ' 








compiler can reserve the required 
amount of memory for it; this is done 
by enclosing the required number of 
characters in square brackets. 

You address the individual ele- 
ments within an array just as you 
would in BASIC, by putting the 
element number within the square 
brackets. But you must remember 
that in C, arrays start with element 
0, so our array buffer contains 128 
elements, numbered from 0 to 127. 
So, buffer[0] is the first element, 
buffer[1] the second and so on. Of 
course, you can put a variable within 
the square brackets instead, which is 
what we have done here — the vari- 
able x is used, and this is set to zero at 
the start of the program to guarantee 
that we start off by addressing the 
first element in buffer. 

As an aside, the compiler is sup- 
posed to set a variable to zero when it 
is declared. Thus, the declaration, 


int x3 
should create the variable x and set it 




















to zero automatically. However, one 
or two compilers don’t do this and so I 
make a habit of always setting vari- 
ables to a known value just to be safe. 

To collect characters from the 
keyboard and place them in the 
buffer, we use a while loop. Natural- 
ly we must impose some method of 
breaking out of the loop and this is 
done with two conditions: we carry on 
accepting characters until x equals 
128, meaning we have filled the 
buffer completely, or until the char- 
acter typed in is a carriage return, 
ASCII 13. As a precaution, we have 
also set ¢ to zero before entering the 
loop, thus ensuring that the loop will 
be executed at least once. 

Inside the loop, we use the input 
function getchar() to obtain a single 
character, and assign that character 
to the variable c, with a statement, 


ce = getchar(); 


The next line checks that ¢ isn’t a 
carriage return and ifit isn’t, places it 
in the next element of buffer, using 
the variable x as an index. x is then 
incremented and we loop back for the 
next character. 

Once a carriage return has been 
typed or we have filled the buffer, the 
program drops out of the loop and we 
print out the contents of the buffer, 
using the standard function printf(). 


Fine Print 


This is a powerful function which 
required some explanation. At its 
simplest, it required just one argu- 
ment, a string to be printed: 


printf(‘“Hello”); 


Suppose we used exactly this state- 
ment several times throughout a long 
program and we later realised that 
“Good morning” would be a more 
appropriate message; we would have 
to work our way through the entire 
program changing “Hello” to “Good 
morning”, and checking carefully 
that we had found each occurrence of 
“Hello”. An easier method would be 
to declare “Hello” as a string right at 
the start of the program: 


greet[] = (“Hello’’); 


This sets up a character array called 








char 
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greet and puts “Hello” into it. We 
don’t need to say how large greet 
must be in this case as the compiler 
will work it out for us. In fact greet 
will contain six elements for “Hello”, 
as in C strings are terminated with 
an additional character, set to zero. 
This allows string-handling functions 
such as printf() to recognise the end 
of a string. 

This method also saves memory, as 
“Hello” is stored only once in the 
program. And of course if we want to 
change “Hello” to “Good morning” we 
have only one string to alter. All we 
need now is a way of telling printf() 
what to print each time we want 
“Hello” to appear. 





Spoilt For Choice 


We do this by giving printf() a format 
string and the name of the string to 
be printed. In our example here, the 
format string is “%s”, which tells 
printfQ that it has to print a string, 
and this is followed by the name of the 
string to be printed, buffer. There 
are various symbols which we can put 
in the format string including 





%d to print an integer, 

%f to print a floating point number, 

%c to print a single character, and 

\n to print a carriage return and 
linefeed sequence. 


For instance, we could change the 
printout statement in our program to 
move to anew line before printing the 
contents of buffer with: 


printf(“ \n%s’’, buffer); 


The program ends with the command 
exit(0) which causes it to terminate 
tidily and return control to the oper- 
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ating system. exit in fact allows you 
to return a code to the operating 
system; by convention, zero signifies 
that the program terminated correct- 
ly and any other value signifies that 
some error condition occurred. Not all 
operating systems do anything with 
the returned value, however. 





Tightening Up 

If you have been following this series, 
you will be aware that one of the 
glories of C is the way in which code 
can be tightened up with all sorts of 
tricks. The example program above is 
quite loose and we can easily smarten 
it up; the while loop, for instance can 
be re-written as: 


while (x < 128 && (c=getchar())!= 
13 ) buffer [x++] = ¢c; 


What we have done is to move 
getchar() into the condition so that 
we accept a character and assign it to 
c before testing to see whether it’s a 
carriage return. Note that we have to 
put brackets around c=getchar() to 
ensure that the test for carriage 
return is performed on the character 
typed in at the keyboard and placed 
in c. Then we have done away with 
the separate statement which incre- 
ments x simply by carrying out the 
incrementing when we use x to place 
the character in the buffer. 

Note, though, that the increment 
operator (++) comes after we refer to 
x; if we used ++x instead, the effect 
would be to increment x before plac- 
ing the character in the array. So, on 
our first trip through the loop, x 
would start off as zero. On reaching 
buffer[++x] =c; it would be in- 
cremented to 1, and c would be placed 

g Bl 
re 





in buffer[1] instead of buffer[0], 
which would always remain empty. 
The effect of this would become 
apparent with printf() tries to dis- 
play the contents of buffer; it consid- 
ers a zero character to mark the end 
of a string and that’s what it would 
find in the first element of buffer — so 
it would stop printing and the string 
you had typed would never appear on 
the screen! 

To get really fancy, we can modify 


the while loop still further to: 


while ( x < 128 && (buffer[x++]= 
getchar()) != 13) ; 


This does away with the variable c 
altogether and puts the incoming 
character straight into buffer before 
testing it. All the work is done within 
the while statement and the loop 
itself consists of just a dummy line, 
the ; at the end! 

But there is one subtle difference 
here. Because we place the character 
straight into buffer before testing it, 
this means that the carriage return 
also goes into the buffer. Previously, 
the test was performed befere assign- 
ing the character to the array and so 
the carriage return was not stored 
along with the other characters. 
Clearly, the method you choose de- 
pends on the application, but you 
probably won’t want to store the 
carriage return — it’s purpose is 
purely to break out of the input loop 
and isn’t needed in the array. The 
empty element after the last charac- 
ter typed in serves to mark the end of 
the string as far as the standard C 
functions like printf() are concerned. 
This is a convention that is well 
worth making an effort to keep to in 
your C programming. 





ILLUSTRATION BY GEORGE SNOW 
































* * SPECIAL OFFER *« « 
EMAP computer publications have organised a sponsored mass 
parachute jump in aid of the Ethiopian famine appeal. Weather 
permitting this should have already taken place by the time this issue 

reaches the newstand. MICROVITEC have kindly agreed to donate one 


of their CUB medium resolution colour monitors* to OL User, 
provided | complete the jump. 











This monitor is now being offered at a greatly reduced price of £200 (as 
opposed to £275) to the first reader of OL User to phone 01-251 6222 
extension 2463 after 9.30am on Monday 25th February. 

The sum received for this monitor will be paid directly to the 
famine relief fund. 


Phil Baker 


* (See inside front cover) 


Hg A ; ) There's an even bigger eid es in store for 
ae youn the March edition of Computer & 
Di EO / VideoGames. A special 32-page Adventure 


supplement edited by resident expert Keith 
Campbell, plus great games listings, reviews, 
‘the Top 30 chart and much more. 
At your newsagent on the 16th of February. 
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ALL ORDERS DESPATCHED SAME DAY 
SELLING PRINTERS SINCE 1980 ! 


PRINTERS 
DOT-MATRIX 
Ex VAT Inc VAT 

EPSON RX 80 £185.00 £212.75 
EPSON RX 80F/T+ £212.00 £244.80 
EPSON RX 100 FT £347.00 £399.05 
EPSON FX 80 F/T £314.00 £361.10 
EPSON FX100 F/T £425.00 £488.75 
BROTHER HR5 AREER UAE AL 


DOT MATRIX PLUS NEAR LETTER QUALITY 


KAGA TAXAN 810 £245.00 £281.75 
CANON PW1080A £269.00 £309.35 


DAISY WHEEL 


| JUKI 6100 £325.00 £373.75 
BROTHER HR15 £329.00 £378.35 
EPSON DX100 £356.00 £409.40 


QL RS232 INTERFACES 
MIRACLE SYSTEMS £32.50 £37.37 
EPSON RS232 £27.00 £34.05 


WANTED 


OL Software or Hardware 
First Class Terms Offered 


SHOWROOM OPEN 9,00 am to 6.00 pm DAILY. 9.00 am to 1.00 pm SATURDAY 


DELIVERY PRINTERS/MONITORS (SECURICORP) £10.00 Other £1.00 


PARALLEL 
PRINTER 
INTERFACE 


£39;25 


* 12months guarantee 

* Fully self-contained with connectors and 1-5 metre cable 

* Plugs into Sinclair QL's RS232C port and 

* Drives any CENTRONICS compatible printer, eg Epson, 
Seikosha, Juki, OKI, NEC, Shinwa, Star, MCP-40, Canon, 
etc, etc 

* Fully QDOS and SuperBasic compatible 


To order send name and address with cheque to: 

MIRACLE SYSTEMS Ltd 

Avondale Workshops 

Woodland Way Sinclair and QL are 
Kingswood trademarks of 
Bristol BS15 1QL Sinclair Research 


0272 603871 Ext 210 
a @ Available at larger branches of WHSMITH 
; 


Access orders welcomed 


FREE With all Printers. QL Users Printer Guide 

Getting the best from your printer is NOT easy ! 
We supply a FREE booklet with all printers which explains how to obtain all the features 
available on your printer. Without this you could waste many hours. Buy elsewhere and 


you'll pay far more and get far less ! 


Ex VAT Inc VAT 
SINCLAIR QL £334.00 £384.10 


~ DISK DRIVES AND QL BOOKS 
NOW INSTOCK _.. 


-_ MEMORY EXPANSION BOARDS 
64K £82.00 £94.30 
256K £199.00 £228.85 


SOFTWARE 
METACOMCO 
ASSEMBLER. £35.00 £39.00 
PSION CHESS £15.60 £417.90 


MONITORS 
MICROVITEC 
CUB 653: £220.00 £253.00 
FULL PACKAGE OFFER 


Sinclair QL. Microvitec Cub 653 
Epson RX80 F/T. Price includes all 
leads and interfaces. (Other printers 
fol Yoo) 1 (e]e)[=)) 

REC RETAIL (inc VAT) £1070.00 
OUR PRICE (inc VAT) £899.00 


Printerland, Unit 27, Estate Buildings, Railway Street, Huddersfield HD1 1JP 


Telephone Huddersfield 514105/687875 


Make money for your business with 


Sinclair OL in Business 
by Arnold Handley 


Sinclair QL in Business opens up the hidden profit 
potential of this value-for-money computer. 

If you were formally trained as a programmer, 
Sinclair QL in Business breaks all the rules. If you 
have never handled a computer in your life, this 
book can make money for your business. 

160 pagesapprox £7.95approx 216 x 138 

0408 015594 Illustrated 


Also available 


Questions & Answers on Computers 
Steve Money 


A straightforward, but serious, introduction to the 
way computers work, and their various 
components, techniques and applications. 

7128 pagesapprox £2.95 165x117mm 
0408 009756 Illustrated 


Order now from your 
bookseller 


Newnes 
Technical Books 
Borough Green, 

Sevenoaks, 
Kent TN15 8PH 





Secret Locatio 


When formatted, a cartridge is split 
up into a number of sectors each 
containing 512 bytes. When a file is 
saved, the information in it is stored 
in numbered blocks occupying a sec- 
tor apiece. The sectors in which a file 
is stored need not necessarily come 
one after the other but may well be 
spread out across the length of the 
tape. How then does the QL know 
which sector to go to in order to fetch 
the next block in a file? 

The secret lies in a table floating 
around in the QL’s memory known as 
the microdrive map. The table is 
arranged in sector number order 
from 0 to 254. Each sector can 
correspond to a particular block with- 
in a file. Files are numbered in the 
order found in a normal directory 
listing. Certain file numbers, howev- 
er, have a special significance: 

File No 
0 Actual cartridge directory 
248 Special Sector Map 
253 Free Data Sectors 
254-255 Faulty Sectors 
The relevant System Variable for 
accessing this information is SV_ 
FSDEF whose address is $28100 
(hex) or in decimal 164096. Here 
QDOS stores a pointer (ie, a further 
address) to the base of a block of 
memory in which the cartridge’s 
name is stored over ten bytes starting 
from $14 (22 decimal) and then for 
each sector, one byte containing a file 
eee and another the block num- 
er. 

The following SuperBasic program 
demonstrates how to get at this 
information. First a normal directory 
(line 130) is produced and then a loop 
is set up (lines 300-490) which ex- 
tracts a file number (line 310) and 
block number (line 320) for each 
sector on the table. 

NB. Replace ‘£’ sign with ‘#’ on the 
listing opposite. 


PEEKs & POKEs 


Pressing CTRL and F5 simul- 
taneously will freeze a screen until a 
key is pressed. This effect may be 
simulated in a program by the follow- 
ing POKEs. 
POKE 163891,1... to freeze screen 
POKE 163891,0.. . to activate 
Knowing whether the TV or Moni- 
tor mode has been selected at the 
beginning of a session on the QL is 
particularly useful when it comes to 
designing screens. To find out which 
has been selected simply: 
PRINT PEEK (163890) 






























Deep down in the QL’s memory 





are places where QDOS hides 





its secrets. Alan Turnbull 





investigates whilst our 





technical team POKE about. 






































MODE S12 
CLS 


LET medium_names="" 
FOR character=1 TO 10 


END FOR character 


PRINT 

LET number_of_free_sectors=0 
LET number _of _bad_sectors=0 
PRINT "SECTOR FILE BLOCK 
PRINT NO. u AS NO. un , "NO. Bs 1 

PRINT 

FOR sector uber TO 254 





PRINT " "“3sector_number, 
direc ide ‘ON fiteS eodiee— 








REMark QL Microdrive Profile Reporter Program 


110 REMark (c) August 1984, Alan Turnbull 
120°4 
130 DIR £03; mdvi_ 


PRINT "QL MICRODRIVE CARTRIDGE PROFILE FOR: 


SECTOR FILE 
NO. 2 NO. as "NO. “ ; 





If zero, then Monitor mode has been 
selected. 

The following POK Ks allow you to set 
upper i lower case from within a 


progra 

POKE _W 163976,255 ...turn on 
CAPS LOCK: 

POKE_W 163976,0... turn off. 


If you feel that your QL is a little too 
slow in repeating a character when 
you have your finger on its key, then 
these two POKEs should interest 


you. 
POKE_W 163980,n... alters the 
delay before the character starts 
repeating 
POKE_W 163982,n... alters the 
speed at which the character repeats. 
n represents tenths of second. De- 
fault values are 30 and 2 respectively. 
Incidentally, setting both to 0 is a 
particularly good trick to play if you 
are feeling mischievious as it makes 
the entry of any commands near 
impossible. 
To find out which microdrive is cur- 
rently whirring enter: 
PRINT PEEK (164078) 
Finally, unlikely though it may be, 
if you have managed to set up a 
network of QLs then to discover your 
station number simply type: 
PRINT PEEK (1ga50) 








LET microdrive_physical_layer_address=PEEK_L (164096) | 
LET map_address=microdrive_physical_layer_addresst40 
LET medium_name_address=microdrive_physical layer _addresst+22 


LET medium_names=medium_namet & CHRS(PEEK (medium _name ~address+character-1) 


“; medium _name> 


BLOCK SECTOR, FILE 


BLOCK" 
NO. *," Nd.","NO.” a 


LET file number =PEEK (map _. address+sector _number *2) 
LET ages _number =PEEK (map_address+sector number *2+1) 










f bad sectors = 
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Just like ham and eggs and peaches and cream, Commodore 
User is the perfect companion for your 64 or Vic 20. Every 
month Commodore User is packed full of the latest new 
games reviews, special projects and business computing, 
plus the latest software charts, Tommy’s Tips for your tricky 





computer problems, 





and much much more. 
Commodore User, the 
perfect magazine for "Mili qa 
Commodore owners, at \ \\ ' Feral ‘he 
your newsagent on the ie 


first of every month. qa 
All for only 95p. il 
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- With Quest the OL 
really means business 


Quest's Executive series of quality 
peripherals and software for the SinclairQL 
allows the business and serious home user to 
fully realise the full potential of the most 

--exciting computer of the 80's. 
Post the coupon below to obtain details — 
“of a wide range of Quest Executive products 
























Floppy and Winchester Disk Drives 
or Expansion eoards 










CP/M 68K 


Quest International Computers, 
School Lane, 
Chandlers Ford, Hants. SO5 BY, 
Telex 47326. 


ails of the Quest Executive Series 


mi 


pee eee [el NOL. 


ie ————— My QL Serial Number 


see Micronet 





AVON 


‘DEVON 





Bath. Boots, 1 Marchants Passage, 
Southgate. Tel: 0225 64402. 
BristoL Avon vapors! Rentals, 
16 West Street, Old Market. 

Tek 0272 550600. 

Bristol. Boots, 59 Broadmead. 

Tél 0272 293631. 

Bristol Laskys, 16-20 Penn Street. 
Tel: 0272 30421, 

Keynsham Key Paria sies Systems 
42b High Street. Tel: 02756 5575. 
Weston-super- Mare. K & K 
Computers, 32 Alfred Street. 

Tek 0934 419324. 
__BEDFORDSHIRE _ 
Bedford. Boots, The Harpur Centre, 

Harpur Street. Tel: 0234 56231. 
Dunstable. Dormans, 7-11 Broad 
Walk. Tel: 0582 38302. 

Leighton Buzzard. Datasine, 

59 North Street. Tel: 0525 374200. 
Leighton Buzzard. Milton Keynes 
Music & Computers, 17 Bridge 
Street. Tel: 0525 382504. 

Luton. Hobbyte, Unit 16, The 
Arndale Centre. Tel: 0582 457195. 
Luton. Laskys, 190-192 Arndale 
Centre. Tel: 0582 38302. 

Luton. Terry More, 49 George 
Street. Tel: 0582 23391. 

—_ _ BERKSHIRE 
Slough. Laskys, 75 Queensmere 
Centre. Tel: 0753 78269. 

Slough. MV Games, 245 High 
Street. Tel: 75 21594. 

_BUCKINGHAMSHIRE 

Bletchley. RAMS Computer 
Centre, 1] aad 

Tek 0908 647744. 

Chesham. Reed Photo & 
Computers, 113 High Street. 

Tel: 0494 783373. 

ai CAMBRIDGESHIRE __ 
Cambridge. Boots, 65-67 Sidney 
Street and 28 Petty Curry Street: 
Tek 0223 350213 

Cambridge. Cambridge Compute 
Store, 4 Emmanuel Street. 

Tel: 0223 358264 

Cambridge. Heffers Stationers. 
19 Sidney Street. Tel: 0223 358241. 
Peterborough. Boots, 

40-42 Bridge Street, Queensgate. 
Tek: 0733 65352. 

on _CHESHIRE_ __ 
Chester. Boots, 47-55 Foregate 
Street. Tel: 0244 28421 

Chester. Computer Link, 21 St. 
Werburgh Street. Tel: 0244 316516. 
| Crewe. Midshires Computer 
Centre, 68-78 Nantwich Road. 

! Tel: 0270 211086 
Ellesmere Port. RFR TV & Audio, 

| 1 Pooltown Road, Whitby. 

| Tel: 051-356 4150. 

Hyde. C Tech Computers, 184 

Market Street. Tel: 061-366 8223. 
Macclesfield. Camera Computer 
Centre, 118 Mill Street. 0625 27468 
Macclesfield. Computer Centre, 
68 Chestergate. Tel: 0625 618827. 
Marple. Marple Computer Centre, 

|) 30-32 Market Street. 

| Tel: 061-427 4328 

| Stockport. National Micro Centres, 
36 St Petersgate. Tel: 061-429 8080 
Stockport. Stockport Micro Centre, 
46 Brown Street. Tel: 061-477 0248. 
Widnes. Computer City, 78 
Victoria Road. Tel: 051-420 3333. 
Wilmslow. Wilmslow Micro 

| Centre. 62 Grove Street. 

Tek: 0625 530890. 
i ___CLEVELAND 
Middlesbrough. Boots, 
| 88-90 Linthorpe Road, 
The Cleveland Centre. 
Tel: 0642 249616. 
_____CUMBRIA | _ 

| Kendal. The Kendal Computer 

i Centre, Stramongate. 

1 Tek 0539 22559, 

Penrith. Penrith Communications, 

| 14 Castlegate. Tel: 0768 67146. 
Whitehaven. P D Hendren, 

15 King Street. Tel: 0946 2063. 

Workington. Technology Store, 
12 Finkle Street. Tel: 66972. 

| = DERBYSHIRE 
Alfreton. Gordon Harwood, 
67-71 ie Street. Tel: 0733 836781. 
Chesterfield. Boots, 35-37 Low 
Pavement, Market Place. 
Tek 0246 203591. 
Chesterfield. Computer Stores, 
14 Stephenson Place. 

| Tel: 0246 208802. 
Derby. Boots, 1 Devonshire 

| Walk “Tel: 0322 45886. 


| DEVON 


Exeter. Boots, 251 High Street, 7 
Tel: 0392 32244. 
























































Exeter. Open Channel, 
Central Station, Queen Street. 
Tel: 0392 218187. 
Paignton. Computer Systems Ltd, 
35 Hyde Road. Tel: 0803 524284. 
Plymouth. Syntax, 76 Cornwall 
Street. Tel: 0752 28705. 
Seaton. Curtis Computer Services, 
Seaton Computer Sho 
51c Harbour Road. Tel: 0297 22347. 
Tiverton. Actron Microcomputers, 
37 Bampton Street. Tel: 0884 S284 
es ___DORSET___ — 
Bournemouth. Brook Computers, 
370 Charminster Road. 
Tek 0202 533054. 
Bournemouth. Lansdowne 
Computer Centre, 1 Lansdowne 
Crescent, Lansdowne. 
Tek: 0202 20165. 
Dorchester. The Paper Shop, 
Kings Road. Tel: 0305 64564. 
Poole. Lansdowne Computer 
Centre, 14 Arndale Centre. 
Tel: 0202 670901. 
_ESSEX _ 
Basildon. Basildon Software 
Centre, 78-80 Liberty Shoppin 
Hall, East Square. Tel: 0268. 27822, 
Chelmsford. Maxton Hayman, 
5 Broomfield Road. Tel: 0245 354595 
Chelmsford. Way In Computers, 
7 Village Square, isines Village. 
Tel: 0245 467858. 
Colchester. Boots, 5-6 Lion Walk. 
Tel: 0206 577303. 
Grays. H. Reynolds, 28a Southend 
Road. Tel: 0375 31641. 
Harlow. Harlow Computer Centre, 
17 Staple Tye. Tel: 0279 22846. 
Harlow. Laskys, 19 The Harvey 
Centre. Tel: 0279 443495. 
Hornchurch. Comptel Computer 
Systems, 112a North Street. 
el: 0402 446741. 
Ilford. Boots, 177-185 High Road. 
Tel: 01-553 2116. ‘ 
Romford. Software Plus, 
72 North Street. Tel: 70 65271. 
Southend-on-Sea. Computerama, 
88 London Road. Tel: 0702 335443. 
Southend-on-Sea. Computer 
Centre, 336 London Road. 
Tel: 0702 337161. 
Southend-on-Sea. Estuary 
Personal Computers, 318 Chartwell 
North, Victoria Circus Shopping 
Centre. Tel: 0702 614131. 
__GLOUCESTER 
Cheltenham. Laskys, 206 High 
Street. Tel: 0242 570282. 
Cheltenham. Screen Scene, 144 
St. Georges Road. Tel: 0242 528979. 
Gloucester. Boots, 38-46 Eastgate 
Street. Tel: 0452 423501. 
HAMPSHIRE = 
Basingstoke. Fishers, 2-3 Market 
Place. Tel: 0256 22079. 
Southampton. Business 
Electronics, Micromagic At Atkins, 
7 Civic Centre Road. Tel: 0703 25903. 
Waterlooville. GB Microland, 
7 Nyro Parade, London Road. 
Tek 0705 259911. 
HERTFORD 
Hitchin. County Computers, 
13 Bucklesbury. Tek 2 36757. 
Potters Bar. the Computer Shop, 
107 High Street. Tel: 0707 44417. 
Stevenage. DJ Computers, 
11 ‘Town, & uare. Tel: 0438 65501. 
Watford. Laskys, 18 Charter Place. 
Tel: 0923 31905. 
Watford. SRS Microsystems, 
94 The Parade, High Street. 
Tek 0923 26602. 
Watford. Watford Electronics, 
Cardiff Road. Tel: 0923 405588. 
Welwyn Garden City. DJ 
eerie 40 Fretherne Road. 
Tek 96 28444. 



































‘ HUMBERSIDE _ 
Beverley. Computing World, 
10 Swabys Yard, Dyer Lane. 
Tel: 0482 881831. 











by _ KENT 
Ashford. DGH, 10 North Street. 
Tek 0233 32597. 

Ashford. Geerings of Ashford, 

80 High Street. Tel: 0233 33366. 
Bexleyheath. Laskys, 

15-16 Broadway Shopping Centre. 
Tel: 01-301 3478, 

Bromley. Boots, 148-154 High 
Street. Tel: 01-460 6688. 

Bromley. Computers Today. 

31 Market Square. Tel: 01-290 5652. 
Bromley. Walters Computers, 
Army & Nay , 64 High Street 

Tel: 01-460 9991. 

Chatham. Boots, 30-34 Wilmott 
Square, Pentagon Centre. 
Tek 0634 405471. 


naction! 
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MERSEYSIDE 





Gravesend. Gravesend Home 

Computers, 39 The Terrace. 

Tel: 0474 23871. 

Gillingham. Regal Software 

Supplies, 49 High Street. 

Tel: 0634 579634. 

Maidstone. Kent Micros, 51 Union 

Street. Tel: 0622 52784. 

Rainham. sg a Pe 

39 High Street. Tel: 0634 376702. 

Sevenoaks. Ernest Fielder 

Computers, Dorset Street. 

Tek 6739 456800. 

Shortlands. The Village House 

of Computers, 87 Beckenham Lane. 

Tel: 01-460 7122. 

Sittingbourne. Computer Plus, 

65 High Street. Tel: 0795 25677. 

Tunbridge Wells. Modata 

Computer Centre, 28-30 St Johns 

Road. Tel: 0892 41555. 

cea t LANCASHIRE = 

Blackburn. Tempo Computers, 

9 Railway Road. Tel: 0254 691333. 

Blackpool Blackpool Computer 

Store, 179 Church Street. 

Tek 0253 20239. 

Burnley. IMO Business Systems, 

39-43 Standish Street. 

Tek 0282 54299. 

Preston. 4Mat Computin; 

67 Friargate. tel: 0772 561952. 

Preston. Laskys, 1-4 Guildhall 

Arcade. eee é 

Wigan. Wildi omputer Centre, 

11 Mets Street Tek: 0942 22382. 

__LEICESTERSHIRE__ 

Leicester. Boots, 30-36 Gallowtree 

Gate. Tel: 0533 21641. 

Market Harboroi 

Home Computers, 

Tel: 0858 63056. 
LONDON 











Church Street. 





W1. Computers of Wi 
Street, 108 Wi ore 
Tek 01486 0373. 

W1. HMV, 363 Oxford Street. 
Tek 01-629 1240. 

W1. Laskys, 42 Tottenham Court 
Road. Tel: 01-636 0845. 

W1. Lion House, 227 Tottenham 
Court Road. Tel: 01-637 1601. 
W1. Sonic Foto Micro Center, 
256 Tottenham Court Road. 
Tek: 01-580 5826. 

W1. Tomorrows World Today, 
27 Oxford Street. Tel: 01-439 t99, 
wi. bey uselgue a area DH Evans, 
Oxford Street. Tel: 01-629 8800. 
WC1. Transam Micro Systems, 
59-61 Theobalds Road. 

Tek 01-405 5240. 

W8. Walters Computers, Barkers, 
Kensington High Street 

Tel: 01-937 5432. 

SE7. Vic Oddens Micros, 

5 London Bridge Walk. 

Tek 01-403 1988. 

SE9. Square Deal, 

373-375 Footscray Road, 

New Eltham. Tel: 01-859 1516. 
Lewisham. Laskys, 164 High 
Street. Tel: 01-852 1375. 

SE15. Castlehurst Ltd, 152 Rye 
Lane, Peckham. Tel: 01-639 2205. 
EC2. Devron Computer centre, 
155 Moorgate. tel: 01-638 3339. 
N14. Logic Sales, 19 The Bourne, 
The Broadway, Southgate. 

Tel: 01-882 4942. 

N22. Boots, 38-40 High Road, 
Wood Green. Tel: 01-881 0101. 
NW3. Maycraft Micros, 

58 Rosslyn Hill, Hampstead. 

Tek 01-431 1300. 

NW4. Davinci Computer Store, 
112 Brent Street, Hendon. 

Tek 01-202 2272. 

NW7. Computers Inc, 86 Golders 
Green. Tel: 01- 209 0401. 

NW10. Technomatic, 17 Burnle 
Road, Wembley. Tel: 01-208 1177. 
‘ MANCHESTER 7 
Bolton. Computer World UK Ltd, 
208 Chorley Old Road. 

Tel: 0204 494304. 

Manchester. Boots, 32 Market 
Street. Tel: 061-832 6533. 
Manchester. Laskys, 12-14 St. 
Marys Gate. Tel: 061-833 0268. 
Manchester. Mighty Micro, 
Sherwood Centre, 268 Wilmslow 
Road, Fallowfield. Tel: 061-224 8117. 
Manchester. NSC Computer 
Shops, 29 Hanging Ditch. 

Tel: 061-832 2269. 

Manchester. Walters Computers, 
Kendal Milne, Deansgate. 

Tek 061-832 3414. 

Oldham. Home & Business 
Computers, 54 Yorkshire Street. 
Tel: 061-633 1608. 

Swinton. Mr Micro, 69 Partington 
Lane. Tel: 061-728 2282. 


ore 
treet. 








Harborough 


Heswall. Thornguard Computer ' 
Systems, 46 Pensby Road. 

el: 051-342 7516. 
Liverpool. Hargreaves, 31-37 
Warbreck Moor, Walton. 
Tel: 051-525 1782. 
Liverpool. Laskys, Dale Street. 
Tek 051-236 3298, 
St. Helens. Microman Com ters, 
Rainford Industrial Estate, Mill 
Lane Rainford. Tel: 0744 885242. 
Southport. Central Studios, 
38 Eastbank Street. Tel: 0704 31881. 

MIDDLESEX _ 
Enfield. Laskys, 44-48 Palace 
Garden Shopping Centre. 

Tel: 01-363 6627. 
Harrow. Camera Arts, 42 St Anns 
Road. Tel: 01-427 5469. 

Harrow. Harrow Micro, 24 
Springfield Road. Tel: 01-427 0098. 
ounslow. Boots, 193-199 High 

Street Tel: 01-570 0156. 

Southall. Twillstar Computers Ltd, 
7 Regina Road. Tel: O1-s44 5271. 
Teddington. Andrews, Broad 
Street. Tel: 01-997 4716. 
Twickenham. Twickenham 
Computer Centre, 72 Heath Road. 
Tek 01-892 7896. 

Uxbridge. JKL Computers, 

7 Windsor Street. Tel: 0895 51815. 

__ NORFOLK 
Norwich. Adams, 125-129 King 
Street. Tel: 0603 22129. 

____ NOTTINGHAMSHIRE = 
Sutton in Ashfield. HN & L Fisher, 
87 Outram Street. Tel: 0623 54734. 
OXFORDSHIRE 
Abingdon. Ivor Fields Computers, 
21 Stern Street. tel: 0235 31207, 
Banbury. Computer Plus, 
2 Church lane. Tel; 0295 55890. 
Oxford. Absolute Sound & Video, 
19 Old High Street, Headington. 
Tel: 0865 85661. 
Oxford. Science Studio, 7 Little 
Clarendon Street. Tel: 0865 54022. 
SCOTLAND __ : 
Aberdeen. Boots, 133-141 Union 
Street. Tel: 0224 585349, 
Edinburgh. Boots, 101-103 Princes 
Street. Tel: 031-225 8331. 
Edinburgh. Laskys, 4 St. James 
Centre. Tel: 031-556 1864. 
Glasgow. Boots, 200 Sauchiehall 
Street. Tel; 041-332 1925, 
Glasgow. Boots, Union Street 
and Argyle Street. Tel; 041-248 7387. 
Glasgow. Tom Dixon Cameras, 
15-17 Queen Street. 
Tel: 041-204 0826. 

SHROPSHIRE 
Shrewsbury. Clairmont 
Enterprises, Hills Lane. 

Tel: 3647 52949, 

Shrewsbury. Computerama, 13 
Castlegate. Tel: 0743 60528. 
Telford. Computer Village Ltd, 
2/3 Hazeldine House, Central 
Square. Tel: 0952 506771. 
Telford. Telford Electronics, 

38 Mall 4. Tel: 0952 504911. 

STAFFORDSHIRE 
Newcastle-under-Lyme. 
Computer Cabin, 24 The Parade, 
Silverdale. Tel: 0782 636911. 
Stafford. Computerama, 59 
Foregate Street. Tel: 0785 41899. 
Stoke-on-Trent. Computerama, 
11 Market Square Arcade, Hanley. 
Tel: 0782 268524. 

‘i SUFFOLK _ 
Bury St Edmunds. Boots, 
11-13 Cornhill. Tel: 0284 701516. 
Bury St. Edmunds. The 
Computer Centre, 1-3 Garland 
Street. Tel: 0284 705503. 
Ipswich. Brainwave Micros, 
24 Crown Street. Tel: 047 350965. 

- SURREY wer 
Bagshot. P & H Electronics, 22-24 
Guildford Road. Tel: 0276 73078. 
Croydon. Laskys, 77-81 North End. 
Tek 01-681 44s, 

Satyion, The Vision Store, 

53-59 High Street. Tel: 01-686 6362. 
ra epee The Vision Store, 

96-98 North End. Tel: 01-681 7539. 
Epsom. The Micro Workshop, 

12 Station Approach. 

Tel: 0372 724933, 

Guildford. Walters Computers, 
Army & Navy, 105-111 High Street. 
Tel: 0483 68171. 

Wallington. Surrey Micro 
Systems, 53 Woodcote 

Road. Tek 01-647 5636. 

Woking. Harpers, 71-73 
Commercial Way. 

Tel: 0486 225657. 
























































See Micronet at John Lewis, Laskys Vale maarelial Boots branches 
Phone 01-278 3143 for your free information pack now! 
Micronet 800, 8 Herbal Hill, London EC1 


=e SUSSEX er 
Bexhill-on-Sea. Computerware, 
22 St. Leonards Road. 
Tek 0424 223340. 
Brighton. Boots, 129 North Street 
Tek 0273 27088. 
Brighton. Gamer, 71 East Street. 
Tek 0273 728681. 
Brighton. Laskys, 151-152 Western 
Road. Tel: 0273 725625. 
Crawley. Gatwick Computers, 
62 The Boulevard. Tel: 0293 37842. 
Crawley. Laskys, 6-8 Queensway. 
Tel: 0293 544622. 
Eastbourne. Boots, 15 Eastbourne 
Arndale Centre. Tel: 

__TYNE & WEAR _ 
Gateshead. DP Supplies, 
St. Andrews House, Westfield 
Terrace. Tel: 0632 785068. 
Newcastle-upon-Tyne. Boots, 
Eldon Square. Tel: 0632 329844. 


Newcastle-upon-Tyne. 
RE Computing, 12 Jesmond Road. 
Tel: 0632 815580. 
WALES 

Aberdare. Inkey Computer 
Services, 70 Mill Street, he Square, 
Trecynon. Tel: 0685 881828, 
Aberystwyth. Aberdata at 
Galloways, 23 Pier Street. 
Tel: 0970 615522. 
Cardiff. Boots, 26 Queens Street 
& 105 Frederick Street. 
Tek 0222 31291. 
Cardiff. P & P Computers. 
41 The Hayes. Tel; 0222 26666. 
Swansea. ts, 17 St. Marys 
Arcade, The Quadrant Shopping 
Centre. Tel: 0792 43461. 

WARWICKSHIRE 


Coventry. Impulse Computer 
World, 60 Hertford Street Precinct. 
Tel: 0203 553701. 

Coventry. JBC Micro Services, 200} 
Earlsdon Avenue, North Earlsdon. 
Tek 0203 73813. 

Coventry. Laskys, Lower Precinct. 
Tel: 0203 27712. 

Leamington Spa. IC Computers, 
43 Russell Street. Tel: 0926 36244. 
Leamington or Leamington 
Hobby Centre, 121 Regent Street. 
Tek 0926 29211. 

Nuneaton. Micro sap 1a Queens 
Road. Tel: 0203 382049, 

Rugby. O.E.M.,9-11 Regent Street. 
Tel: 0788 70522. 

WEST MIDLANDS _ 
Birmingham. Boots, City Centre 
House, 16-17 New Street. 

Tel: 021-643 7582. 
Birmingham. Laskys, 19-21 
Corporation Street. 
Tel: 021-632 6303. 
Dudley. Central Computers, 
35 Churchill Precinct. 
Tek: 0384 238169. 
Stourbridge. Walters Computer 
Systems. 12 Hagley Road. 

1: 0384 370811. 
Walsall. New Horizon, 1 Goodall 
Street. Tel: 0922 24821. 
West Bromwich, DS Peakman, 
7 Queens Square. Tel: 021-525 7910. 
Wolverhampton. Laskys, 
2 Wulfrum Square. Tel: 0902714568. 

YORKSHIRE _ 

Bradford. Boots, 11 Darley Street. 
Tel: 0274 390891. 
Leeds. Boots, 19 Albion Arcade, 
Bond Street Centre. 
Tel: 0532 33551. 
Sheffield. Laskys, 58 Leopold 
Street. Tel: 0742750971. 
York. York Computer Centre, 
7 Stonegate ros 
Tek 641862. 
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Disk drives are mass storage devices 
which provide. read/write non- 
volatile memory (ie memory that 
does not disappear when the compu- 
ter is switched off). The alternatives 
to disk drives are cassette tapes, 
microdrive cartridges, erasable/ 
programmable ROMs and CMOS- 
backed RAM, that is, battery sup- 
ported RAM (for which power is 
never switched off). 

Floppy disk drives were invented 
by IBM in 1973. Originally some 8” in 
diameter they have since been re- 
duced in size to 5.25”, and more 
recently to 3.5” and 3” making them 
more compact and giving faster ac- 
cess. 

The floppy disk itself is plastic 
coated with ferric oxide and is pro- 
tected by a cardboard or plastic 
casing. In addition to the ‘access’ hole 
about which the disk rotates, the 
casing has a notch in one corner, a 
small timing hole slightly off centre 
and a slot across its radius. 

The notch if covered or ‘tagged’ 
provides a simple way to prevent 
further information from being writ- 
ten to the disk. 





The timing hole provides a means for 
gauging the speed at which the disk 
rotates. A beam of lightis shone down 
onto the disk and through a small 
index hole in it to be picked up by a 
photosensor on the other side. 

The remaining slot permits the 
drive’s read/write head(s) to move 
freely over the disk’s surface and 
locate the correct track to which 
information may be written, or from 
which it may be read. 

Like a microdrive cartridge, a disk 


| must be ‘formatted’ before it may be 


used. The operation consists of the 


| disk being magnetically divided up 
| into concentric tracks and then furth- 
| er subdivided into sectors. Disks for 


_the QL may be formatted on one or 
both sides, thus 40 or 80 tracks. 








Atlong last, QL disk drives. 
And first on the scene are 
CST — we test their interface 
and preview the competition. 


However, they will invariably con- 
tain nine sectors per track and 512 
bytes per sector (double density). 
Tracks and sectors are numbered and 
this is stored in a ‘header’ at the start 
of eyery sector along with informa- 
tion pointers to related sectors. 

In operation, the disk rotates on a 
spindle at 300-360 revolutions per 
minute. An electromagnetic head 
then moves over the disk’s surface 
guided by an electronic disk control- 
ler. The controller also translates 
electrical signals from the computer, 
sending them to the head which 
produces magnetic fields to be re- 
corded on the disk when data is 
written. The process is reversed 
when data is being read. Data is 
synchronised, as with every byte, a 
timing is sent to keep in step. Ifa disk 
drive is double sided, two heads will 
read and write information to either 
side of a disk. 

Speed: On a microdrive the read/ 
write head is static and the tape alone 
moves around. This means that to go 
back to the beginning of a file, the 
tape must be wound round almost a 
full circuit. On a disk, a movable head 
means that little more than a single 
rotation is required to extract any 
piece of information. As a result, 
access times on disk averages 125 
milliseconds as opposed to the QL 
microdrive’s 3.5 seconds. 

Capacity: Whilst microdrives are 
limited to a maximum of 80-100K, on 
disk up to 3-megabytes are available. 

Maintenance: Unlike the microd- 
rive tape, the floppy’s surface is not in 
constant contact with the read/write 
head and consequently is not subject 
to the same amount of wear and tear. 
Indeed with some floppies it is not 
uncommon to find that the integrity 














of data has been guaranteed by the 
























































manufacturer. However, it is highly 
unlikely that this will ever be the case 
for microdrives. With the microdrive 
tape in contact with the read/write 
head, the medium is subject to con- 
siderably more wear and tear than its | 
floppy cousin. 

Price: Until quite recently disk 
drives giving a reasonable amount of | 
storage (1 megabyte) were prohibi- 
tively expensive and often cost more 
than the computer itself. However, 
this is no longer the case and though 
in absolute terms they remain more | 
expensive than, say, an additional 
microdrive or two, large storage 
capacities mean that the disk user 
benefits from substantial economies 
of scale in relative terms. 

For example, assuming that the 
cost of an additional microdrive for 
the QL matches that for the Spec- 
trum, then 1K’s storage works out at 
52p (50/95), whereas on a 1 megabyte 
disk drive (plus interface) this works 
out at 48p (350/720). Furthermore, 
the cost of back-ups works out at 
£4.95 and £.005 (half a penny) respec- 
tively. 





With the average 8-bit home compu- 
ter, the benefits of disk drives are | 
often self-evident as the machines 
depend upon cassette tapes which, as 
a storage medium, are hopelessly 
inadequate. However, justifying 
their acquisition is another matter | 
altogether. Insufficient RAM, slow | 
processors, unsophisticated operat- 
ing systems and absence of serious 
software all make it unlikely that the 
drives will be put to good use. 

With the QL, on the other hand, an 
advanced specification virtually 
guarantees that if disks are tagged 
on, users should be able to use them 
to their limits. Yet, if one brushes 
aside the sensationalism surround- 
ing microdrives, the benefits of disk 
drives whilst still apparent are no 
way near as s clear cut. 
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Seen by many as a substitute for 
disks, the QL’s microdrives have 
come under a barrage of criticism. 
This, though often justified — bearing 
in mind the QL’s seemingly exclusive 
reliance on these devices — has 
obscured a number of important 
facts. 

Firstly, the drives do work, and 
when used with the latest versions of 
Psion’s packages, perform adequate- 
ly. For proof you need look no further 
than the magazine itself which has 
been using. unexpanded QLs and 
Quill (V 2.00) to produce much of the 
material published in the last two 
issues, 

Secondly, in terms of capacity, 
speed and reliability, even if they 
cannot compare with disks, the mic- 
rodrives remain a vast improvement 
on cassette storage in reducing load- 
ing times from minutes to tenths of 
seconds. 

And finally, as they are included in 
the cost of the machine, the drives 
come cheap. 

Microdrives then, are a viable stor- 
age medium in themselves. However, 
the original intention that QL should 
rely exclusively upon them (note the 
absence of disk drives in QDOS), is 
absurd. More than anything it has 
contributed to QL’s image as an 
uncertain hybrid between the home 
and business computer with a doubt- 
ful future. 

Obviously microdrives have a role 
to play but that is determined by the 
uses to which QL is put. If we split 
potential applications for the QL into 
four areas — Home, Professional, 
Business and Software Development, 
then the need for alternative 
mediums soon becomes apparent. 








Likely uses here include entertain- 
ment. (games), education (Super- 
Basic), household accounts (Abacus) 
and letter writing (Quill). 

None of these applications are 
likely to demand large amounts of 
storage. Documents for example will 
be one-offs, with programs short and 
accounts simple. In this situation 
microdrives will suffice, though the 
high cost of replacement cartridges 
and the consequent premium paid on 
software is likely to prove a burden. 
Within this context a cheap secon- 
dary back-up medium such as the 
facility to load from, or save to 
cassette could prove to be an attrac- 
tive proposition. 

Here Psion’s packages are likely to 
come into their own as the QL is used 
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primarily as an analytical tool and 
wordprocessor. In either respect, mic- 
rodrives prove adequate though time 
consuming. Furthermore, the car- 
tridges, as they are compact and 
easily transportable would seem (at 
least initially) as attractive as flop- 
pies. 

Nevertheless, even here a single 
disk drive would not be amiss. Not 
only would it provide a speedy way of 
loading existing software but also 
give a more reliable back-up for 
important documents or reports. 
Finally, as byte for byte cartridges 
are three to four times more expen- 
sive than floppies, the disk user 
would enjoy quite substantial sav- 
ings — however not sufficient to offset 
the initial outlay. 


Anybody who has tried assembling or 
compiling a program _ using 
microdrive-based software will real- 
ise that the processes, involving ex- 
tensive file manipulation, make 
heavy weather of an: unexpanded 
QL’s I/O capabilities. Little wonder 
then that almost all commercial QL 
software has been developed on lar- 
ger and faster machines where disk 
drives are standard. 

RAM disks which permit virtually 
instantaneous access, might be consi- 
dered as an alternative to microd- 
rives. However, as the memory is 
volatile, users would be compelled to 
load and save, from and to cartridge 
at the beginning and end of every 
session — a tedious duplication of 
effort and unlikely to appeal to effi- 
ciency conscious programmers. 

So disk drives would appear to be 
the obvious choice. With loading 
times characteristically measured in 
milliseconds as opposed to seconds, 
they would greatly enhance the QL 
as a tool for software development. 
This in turn would speed up the 
purely mechanical processes in prog- 
ram production and leave the prog- 
rammer with more time to apply his 
creative talents. 






This is the domain of the desk top PC, 
with applications typically covering 
accounts production, inventory con- 
trol, sales and budget analysis (Aba- 
cus), financial reporting (Quill and 
Easel) and general correspondence 
(Quill). Here, without the benefit of 
dual disk drives or a Winchester the 
QL simply cannot compete. 
Irrespective of their _ size, 
businesses require a _ disprop- 
ortionately large amount of reliable 
backing store to archive records for 





















































long periods of time. In this environ- 
ment microdrives are hopelessly in- 
adequate. The limited capacities of 
cartridges (80K) impose severe con- 
straints upon the size of files, and 
make comprehensive stock control 
systems near impossible to construct, 
let alone maintain. 

Additionally, large databases us- 
ing Archive would be too slow. in 
locating records or making updates. 
Finally, the need to constantly back- 
up records would impose considerable 
wear and tear upon cartridges as, 
unlike disks, the read/write head is in 
constant contact with the tape. 

Overall, the case for disk drives, as | 
one would expect, varies as the QL 
moves from the living room to the 
office. On the home front, disk drives 
are a luxury that users can afford to | 
ignore. To the professional, microd- | 
rives are adequate but disk drives are | 
better. For. the programmer, disk | 
drives are a godsend that dramatic- | 
ally improve development times. 
Finally, for the businessman disk 
drives are a necessity without which | 
the QL would be useless. 





Computamate’s Q-Disc interface is | 
produced by the Cambridge based | 
company CST. Similar to their Q-PI | 
printer interface, Q-Disc consists of a 
small PCB measuring 105 x 145 x 
25mm with an on-board ROM con- 
taining their disk driver. The driver | 
conforms with the Sinclair defined 
standard — disks formatted with 40/ | 
80 tracks, 9 sectors per track and 512 | 
bytes per sector. The interface is 
understood to run with any 5.25” or 
3.5” Shugart compatible disk drive 
with an independent power source. 
The interface was tested using dual 
double sided, double density Teac 
5.25” drives (2 x 720K) supplied by 
Computamate themselves. 
Installing Q-Disc is a matter o 
seconds. The unit slides into the QL’s 
main I/O port on the left hand edge of 
the machine adding a further two 
inches of ribbed black plastic to. the 
machine’s length. A one metre ribbon 
cable then connects up the interface 
to the disk drive. 
Obviously, once Q-Disc is installed 
no other device may make use of the 
I/O port (Q-PI included). Sinclair are 
understood to be working on an 
expansion module, though as this is 
likely to require its own power source | 
it may be some time in the making. | 
In operation Q-Disc proves to be a 
joy to use. All existing QL file com- 
mands will work with disks, only the 
a name changes (from “mdv” to 
“ p”). } 
A real bonus is that the interface 














provides an arsenal of additional 
commands governing random access, 
file maintenance, job control and 
numeric conversion. Those  ac- 
quainted with the QL Toolkit will 
recognise quite a few of these, as 
author Tony Tebby played a major 
role in the development of Q-Disc. 
Many of the extra commands work 
with microdrives as well as disks. The 
commands are as follows: 

Multitasking JOBS, RJOBS, 
AJOBS, SPJOB — will display various 
jobs and allow you to suspend, acti- 
vate or realease particular tasks. 

Directory Enquiry STAT, 
WSTAT, WDIR, WDEL, WDEL_F — 
variations on the ‘DIR’ theme that 
permits groups of files to be deleted as 
well as listed. The ‘W’ prefix permits 
the use of ‘wild cards’. 

File Maintenance FOPEN, FOP_ 
IN, FOP_OVER, FOP_DIR - Similar 
to the ‘OPEN’ commands but here 
any errors will be trapped and the 
program will not be stalled (ie, ferr = 
FOPEN filename). 

FOP_OVER will be particularly 
welcome enabling a new file to be 
created or existing one overwritten. 
FOP_DIR lets you open a drive’s 
directory file. 

File Enquiry FLEN, FTYP, 
FDAT, FDOS - Will return informa- 
tion concerning a file’s length, type, 
size of data area and your current 
position within the file. 

Random. Access GET, PUT, 
BGET, BPUT — enables you to write 
or read information to and from a 
particular location within a file. In- 
formation will appear either in its 
raw form, suitable for assembler 
programs or formatted so that it may 
be used by a SuperBasic program. 

Numeric Conversion 
| HEX$,BIN$, HEX, BIN — Will con- 
vert information on decimal values 
into binary or hexadecimal strings, or 
vice versa. 

Development Tools FDSEL, 
FDSIDE, FDTRACK, FDREAD — 
Sophisticated routines that will per- 
mit non-standard disks to be read 
and further disk drivers to be writ- 
ten. 

Miscellaneous RENAME, 
TRUNCATE, PROG_USE, DATA_ 
USE, (EXEC, EXEC, EXEC_W) -— 


drives to be specified for program and 
data files. 

With regard to its performance, 
when linked up to disk drives, the QL 
is transformed into a fully fledged 
desk-top PC with file operations car- 
ried out in seconds as opposed to 
minutes. On paper Q-Disc is said to 
reduce access times from an average 
of 3.5 seconds (microdrive) to 125 


milliseconds. The following two tests 
illustrate these savings in real terms. 


mdv flp 


1. Loading a screen 3 secs _ 8 secs 
2. Backing up 


between drives 8 mins 90 secs 


Much to the relief of the majority of 
users and in support of their claim of 
full Psion compatibility, Computa- 
mate include a special conversion 
program with Q-Disc. Whilst the 
program cannot miraculously trans- 
form old versions into new, it does 
breathe new life into them. This is 
achieved by replacing all occurrences 
of “mdv” by “flp” whilst copying the 
programs across to disk. 

Versions 2.00 of the packages will 
run unamended on Q-Disc. These 
versions, we understand will be re- 
leased shortly and include an addi- 
tional program called ‘config_bas’ 
(written by Psion) which permits the 
user to set default devices for system, 
data and help files. 

New or old, all the packages benefit 
from the transfer to disk. On Quill, 
for example, lengthy documents may 
be manipulated as easily as memos; 
loading and saving times are halved; 
scrolling fluid and block moves near 
instantaneous. The most marked im- 
provement, however, comes with 
Archive where faster file access has 
meant a vast improvement in search 
and update times. 

On the new versions, where Psion’s 
own improvements in speed and 
memory usage have eliminated the 
packages’ much criticised snail-like 
qualities, the transfer to disk has 
raised them to a position where they 
can compete openly with the likes of 
WordStar, dBase 2 and VisiCale. 

All in all, being easily installed, 
neat and compact, Q-Disc leaves little 
ground for complaint. A third of the 
cost of a QL, Q-Disc is expensive. 
Extra commands and full Psion com- 
patibility, however, mean that CST 
have not only produced a working 
interface, but given the user every- 
thing he might need to get the most 
out of disks with the least effort. As 
the device is the first on the scene, it 
means that the competition have 
their work cut out for them. 


Computamate Data Products, 
Scotia Road, Burslem, Stoke-on- 
Trent. Tel: 0782 811711. 


Q-Disc Interface, £149 
Teac dual double density 
(720K formatted) disk drives 
plus Q-Disc Interface 

a) 5.25" or 3.5" single sided 








(2 x 360K formatted), £367 

b) 5.25" double sided 

(2 x 720K formatted), £574 

All prices include VAT, cables and 
manuals. Q-Disc will be available 
from W H Smiths and mail order from 
Computamate themselves. 


Medic QL-Expansion 
Cartridge System 
Medic, 76 Grainger Close, Basing- 
stoke, Hants RG22 4EA. 
When seen, this device was still in 
prototype form with a few bugs yet to 
be ironed out. The manufacturer, 
however, is promising the earth in 
the form of a box which will ultimate- 
ly house not just a disk interface but 
modem, memory expansion and pa- 
rallel printer port as well. Like many 
QL peripherals, the interfacing soft- | 
ware is being written by QDOS 
author, Tony Tebby, which bodes 
well for the future. | 
The disk interface is understood to | 
include a Disk Doctor for recovering | 
corrupted data and is authored by 
Leon Heller. The modem will paralle 
Unicom’s specification. 
The product is scheduled (hopeful 
ly) for volume production in Febru- | 
ary. Prices (inc VAT) will be in the | 
following range: 
Disk Interface £80 
Modem £80 
Memory 64K to 512K £100 to £400 


Microperipherals Disk Package 
Intec Unit 3, Hassocks Woods, Wade, | 
Basingstoke, Hants - | 
The package will include a disk 
interface, 720K (formatted) 3.5” disk 
drive plus utilities disk. The inter- 
face, we understand, will be Psion 
compatible (old and new versions). A 
small subset of QL-Toolkit disk hand- 
ling commands will be resident on 
ROM. The remainder will come on 
floppy supplied with the drives. 
These will include disk and screen 
editors. Prices have yet to be fixed. 


Sure Shot Supreme QL Joystick 
Cookridge Computer Supplies, PO 
Box IW9, Leeds LS16 GRE 

There is little call for a joystick on the 
QL at present, though with two 
sophisticated graphics packages from 
Talent and Psion on the horizon the 
situation looks set to change. In 
which case CCS will benefit from 
being the first on the scene. 

Priced at £19.95, the Sure Shot 
would seem rather expensive for 
what is ultimately a relatively un- 
sophisticated device. However, sup- 
plied with a Sure Shot standard 
model (not available for the QL) we 
found the components of a high 
quality and the product responsive 
and durable. 











3 Nisele takes up where others leave off. Why | 
narrow down your choices? The Q.L. was - 
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Individual Products 

[| 64K Memory £99.95 
[|_| 128K Memory P29 595 
[|_| 256K Memory £169.95 
[.]512KMemoryt £259.95 


[| Eprom card socketed (192K 
— excluding Eproms) ex- 
perimentation card with 





front interface £24.95 
[ | Dust Cover that doubles up 
as astand £14.95 
{| Modem* £79.95 


+Can only be powered if Medic 
disc system connected 


“Delivery beginning April 


[ | Please send me further details on your products. 
| wish to order the following: 





(please tick required items) 


Packages 

[.]1 Megabyte disc drive 
(cased, inc. PSU) disc inter- 
face and parallel interface, 
with cables £249.96 

[_|2 1 Megabyte disc drives, 
(cased, inc. PSU) disc inter- 
face parallel interface, with 
cable £399.95 

{_]1 megabyte disc drive, 

memory inc., disc interface 

and parallel interface. 

1 disc drive 2 disc drives 

[ ]64K £299.95 [ | £449.95 


[1 128K £329.95 [] £479.95 
[] 256K £359.95 |] £509.95 


[.]512K £449.95 [| £595.95 


























To order products please make cheques/P.O.’s payable to 
MEDIC DATASYSTEMS LTD. Allow 28 days for delivery. 
All prices include VAT. Please add £5 p&p. 


NAME 





ADDRESS 








Signed eae 
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The QL handbooks, 
compendiums and guides 
continue to pour into the 
bookshops. There’s nothing 
particularly original among 
this month’s selection, which 
are all more or less variations 
of well-worn themes, but 
some could be well worth your 
attention. 


Down-To-Earth 


A QL Compendium by 
Martin Gandoff and Robin 
Kinge, published by Addison- 
Wesley, offers 30 programs 
for your QL, most of which 
are games, plus the 
obligatory introduction to the 
computer itself, keyboard, 
microdrives, starting up, the 
QL editor, and so on. This has 
become a familiar approach, 
but I found this particular 
offering more down-to-earth 
and entertaining than most. 
When the authors come 
across a feature of the QL or 
the manual they do not much 
admire, they tend to say so 
and offer advice on improving 
matters. Throughout the 
book, there are numerous 
practical tips which should 
prove of value to the hobbyist, 
all obviously based on the 
first-hand experiences of the 
authors. 

Chapter two comprises a 
handy guide to effective 
SuperBasic programming; 
not a ‘how to program’ guide 
for the beginner, but a lot of 
advice for users who already 
have some programming 
knowledge. 

The programs themselves 
cover computer ‘art’ and ways 
of creating ‘pretty’ displays 
and backgrounds for games; 
games of skill (Fruit 
Machine, etc.); weapon 
games (Depth Charge, 
Streafe, Mortar, all mostly 
highly murderous); ‘modern 
games (Formula 1, and so 
on); and traditional games 
(Horse Race, Noughts and 
Crosses...). | was not exactly 








knocked out by their 
| originality, butifyou enjoy 
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Nicky Trevett reviews the latest selection 





of books available for the QL. 
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this sort of thing to play on 
your QL, and practice your 
programming technique at 
the same time, you could do 
worse, though £7.95 seems a 
bit high. 

One word of warning, as 
the authors point out, all the 
programs were developed on 
a QL version JM. If you use 
another, be prepared to make 
occasional fine adjustments 
toa program before you are 
able to run it. 


Easy As ABC 


Tim Hartnell’s QL Handbook 
(£7.95, Interface) is not, for 
once, a handbook of games. A 
more suitable title would be 
Tim Hartnell’s QL 
SuperBasic Handbook, since, 
as he admits right at the 
start, it is the built-in 
SuperBasic language that 
really interests him about the 
L 


His aim is to make 
SuperBasic easy to learn, 
appreciate and apply. 
However, although he says 
“T’ve made few, if any, 
assumptions about the level 
of programming proficiency 
you now possess”, anyone 
who is not already reasonably 
familiar with some version of 
BASIC is likely to find 
themselves floundering, 
since the emphasis is on ways 
in which SuperBasic 
transcends BASIC. 

After a few pages telling 
you how to get started on QL, 
the next five chapters deal 
with the fundamental 
components of SuperBasic. 
There is a brief look at 
structured programming 
techniques, a much lengthier 
digression into graphics and 
sound, and two interesting 
chapters introducing two 
languages that can be 
‘emulated’ by SuperBasic — 
Logo and Forth. 

Finally, by way of light 
relief, there is a simulation 
program to enter called 
Bankruptcy, anda chapter on 
creating and playing 
adventures which includes 
two complete programs. 


The Professional 
Approach 


Anyone planning to use their 
QL strictly for business only 
might be interested in Colin 
Lewis’ Professional and 
Business Uses of the QL, 





‘published by Collins at £7.95. 
Colin Lewis sums up the 
purpose of his book 
admirably, declaring that it is 
“For users of the Sinclair QL 
who wish to use the four 
packages supplied (with the 
QL)... to solve practical 
business problems with the 
minimum of fuss.” In other 
words, people who just want 
to stick in a ready-written 
program and make it work 
for their business without 
any of this programming 
nonsense. 

And this is exactly what 
the book helps them to do. 
There is minimal treatment 
of such matters as the 
hardware and the operating 
system, offering only such 
information as is absolutely 
necessary to run the 
software, and maximum 
coverage of Quill, Abacus, 
Archive and Easel. There are 
of course books already 
treating these packages at 
length, not to mention the 
manual itself, but here the 
programs are placed strictly 
in a business context. 

The chapter on Quillisa 
little disappointing, 
concentrating on simply 
exploring the features of 
Quilkand how to use it to do 
your word processing without 


much on possible business 


applications. But the sections 
on Abacus, Archive and Easel 
are more stimulating, 
suggesting ways in which 
Abacus, for example, can be 
used for investment analysis 
and a variety of business 
functions. The Archive 
chapter includes the whole 
process of setting up an 
actual database and then 
manipulating it, and chapter 
six offers a great deal of 
advice on using Easel. 

The final part of the book is 
alittle different and breaks 
the ‘no programming’ rule by 
examining the way in which 
Archive can be used asa 
programming language to 
create new programs to 
perform repetitive tasks. 
These could be printing 
address labels, individually 
addressing letters to clients 
and producing financial 
reports incorporating 
subtotals triggered by the 
change of a sort key. All these 
applications are covered, and 
should prove useful to many 


-business users that they might 


even develop a reluctant 
interest in programming! 





Keeping It 
In The Family 


Abacus alone is the subject of” 


QL Abacus by Clare 
Spottiswoode, the third in the 
series published by Century 
Communications dealing 
with each of the QL’s 
companion software 
packages (QL Quill and QL 
Easel were reviewed in QL 
User, December/January). 

Here are the further 
adventures of the Blake 
family as they make use of 
Abacus to calculate 
mortgages, prepare sales 
forecasts, plan their 
redecorating budgets and so 
on. Like QL Quill, the book 
covers a great deal of ground 
ina highly entertaining 
manner, drawing its example 
applications from both home 
and business. There is the 
usual ‘first steps’ section 
dealing with the QL itself and 
starting up Abacus, then two 
chapters on creating and 
refining spreadsheets. 

Functions and formulae 
are introduced painlessly in 
chapter four, and later 
sections deal with financial 
functions, standard forms, 
invoicing and stock control, 
financial planning and 
mathematical functions. 
There is also a useful little 
chapter on using Abacus with 
a printer, and another 
explaining the type of 
information which can be 
exchanged between the Psion 
packages, including the way 
in which Abacus can receive 
information from Easel and 
Archive and save data for use 
by Easel, Archive and Quill. 

At £8.95, I would strongly 
recommend the book to 
anyone who wishes to get to 
grips with Abacus but finds 
the prospect of wrestling with 
formulae daunting. 


Déja Vu 
Basic Programming on the 
QL by Neil Cryer and Pat 
Cryer is exactly what it says 
—another introduction to 
SuperBasic on the QL. The 
competition here is rapidly 
hotting up, and this attempt 
isa bit pricey at £7.95, 
especially as I can’t help 
feeling that the subject has 
already been adequately 
treated elsewhere. 
However, this version has 
much to recommeng it. Itis 








BOOKMARKS 


|] well-ordered and readable 


and makes every effort to 
avoid jargon and technical 
language. It also adopts a 
‘teaching by doing’ approach 
which means you should have 
a QL to hand in order to try 
out the ‘activities’ as you go 
along. The activities are 
exercises to practice and 
consolidate the techniques 
just learned. The book is also 
very lively, with lots of 
illustrations (screen shots, 
diagrams, listings) to help 
make its points. 

It should be good for 
newcomers, starting off with 
an introduction to 
programming in general 
before it moves on to the 
features of SuperBasic. It 
covers sound, graphics, 
colour, tables, function 
strings, files, and, of course, 
structured programming, 
ending with a games program 
of some originality for you to 
key in. There is also a useful 
glossary of BASIC terms. 


Brisk Trip 


Quick QL Machine Language 
would appear to bea 
contradiction in terms, but 
that is the title of Alan Giles’ 
book, published by 
Melbourne House. Itisa 
brisk, workmanlike look at 
the QL’s 68000 instruction 
set, including listings for an 
assembler anda 
disassembler, and ifit’s 
quick, that’s because it 
assumes the reader already 
knows about machine code 
and understands such things 
as addressing modes, 
registers, data buses and so 
on. 

The first half of the book 
deals with the 68000 
instruction set, including the 
addressing modes, 
commands, initialization and 
control routines for a 
disassembler, logical and 
arithmetic operations, shifts, 
rotates and so on. The second 
halfis devoted to appendices 
covering assembler 
mnemonics, QL ROM version 
names, function and 
procedure names, and the 
two mammoth listings. 

If you have programmed in 
machine code before and 
want to be able to do so on the 
QL, this could be for you. 
Otherwise you will need to 
learn how to use machine 
code before attempting such 
advanced material. 


QL User/March 1985/39 




















ee ee ee ee ae S Se ae Se ee eS ek orca. Ts 





TALENT SP 





Here’s a chance for all you 
budding programmers to 








design a short program, AND 
get it printed in QL User 
magazine AND (possibly) 











win some exciting Talent Computer 
Systems’ software. 








Make sure you 
read this section carefully so that 
your entry is not disqualified. 

Entries must be submitted on mic- 
rodrive only (these will be returned 
same day, as soon as we’ve made a 
copy of the program). 

Any accompanying information 
must appear as a set of REMark 
statements within the program — we 
will not read any covering note, so 
SEND THE MICRODRIVE ONLY! 

It may sound obvious, but don’t 
forget to include your name, address 
and telephone number as one of the 
REMark lines. 


Imagine you have 
just written an amazing graphic 
adventure program. All that’s left is 
to come up with an interesting initial 
loading screen; which is all you have 
to do to enter this competition. 

Things are never that simple, 
however, and this is no exception. 
Programs must contain no more than 
25 lines (excluding REMark lines), 
each line containing a maximum of 
50 characters (including spaces) — we 
will be checking these points careful- 
ly, so make sure your program is 
within the limits. 


Talent Spot Competition, 
QL User, 

Priory Court, 

30-32 Farringdon Lane, 
London EC1R 3AU. 


Allentries must be 
received on or before 31st March, 
1985. 


All programs will be 
checked against the above rules and 
those that qualify will then be asses- 
sed solely on the basis of the screen 
produced when run. 

Programming technique will not 
be part.of the judging, though in the 
event of more than ten entries being 
considered potential winners, the ten 
using the fewest lines will win the 
prizes. 
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Talent Computer Sys- 
tems have kindly donated ten of each 
of their two superb QL adventures 
(‘The lost kingdon of ZKUL’ and 
‘WEST”), for the ten winners. 

In addition, each winning program 
will be printed in a subsequent edi- 
tion of QL User. 

Here’s what we said about these 
two games: 

West places you exactly where 
you'd expect, surrounded by vul- 
tures, tumbleweed and ‘injuns’. Such 
a locale has great advantages in a 
text-only adventure, since we all 
carry in our heads a much more 
comprehensive library of images for 
cowboy country than for any sword 
and sorcery setting. 

The basics of the adventure are 
well-regulated. The objects are scat- 
tered before every new game, but — if 
you're killed — sensibly left by the 
body where your reincarnated self 


can find them again. The locations 
are numerous and subject to random 
visitations from tumbleweed, rat- 
tlers, bad-tempered bank robbers 
and your trusty but fickle steed. 

If reviewer addiction is anything to 
go by (and it should be) then West will 
please, not just adventure addicts, 
but anyone who ever frowned into a 
puzzle of any sort. 

Zkul sends you out into a landscape 
of wizards, dungeons and axe- 
wielding dwarves in pursuit of hidden 
treasure. 

There are a bewildering number of 
settings, some vexing logic tests, a 
full cast, and an entirely satisfactory 
store of treasures. 
eae se OE eet are 
NOTE: Judging will be performed by the 
Editor of QL User, whose decision is final. 
No correspondence about the results will 
be entered into. 


No employees of EMAP or associate 
companies may enter this competition. 


PHOTO BY TERRY BEDDIS 
























Write programs to unlock the multitasking power of your QL! 
Use Metacomco’ s much acclaimed Development Kits to create the soft- 
ware for your QL: Use Assembler for its speed, and for access to the QL's 
many features; use BCPL for systems programming; writing games, 
utilities, and applications packages; use LISP for manipulating data 
structures, and for exploring the world of artificial intelligence. 











ASSEMBLER £39.95 "if 














> Standard Motorola 68000 BCPL Scie 

mnemonics. £59.95 "Si? 

> English error messages. > True compiler. 

> Produces code which can be = MUNDEBCPL pogat alin | —————— 
EXECed, and run as a athe ies LISP £59.9. Nar 
concurrent job. > Full runtime library includes > Full support of QL features 

> External references allow linkage | interfaces to QDOS graphics, file _| including window graphics, and 

to high level languages. operations, window handling, etc. | screen handling. 

> Integral linker allows assembler | > Exception handling provides > Compatible with Acornsoft Lisp 
programs to be linked together. diagnostics for debugging. for the BBC micro. 

> Macro.expansions. > Link loader allows linkage of > Interpreter. 

> Position independent, absolute | separately compiled segments. > Turtle graphics. 

or relocatable code can be produced.| > Assembler and BCPL modules | > Structure editor allows alteration 
> Conditional assembly. can be linked together. of data structures. 

> Large range of directives. > 32-bit variables use the fullQL | > Prettyprinter displays programs 


> Fully formatted listings. address space. 
> 30 character variable names and 


32-bit values. 


in structured format. 

> Tracer to aid in debugging. 

> Garbage collector automatically 
recovers spare memory space. 

> 28-bit integers and 250-character 
names. 


























Each language is supplied as a 
complete Development Kit 
which includes the software 
(on a Microdrive Cartridge), 
Metacomco's popular full 
screen editor, and user 
manual. 














Phone today, or post this coupon 
to: Metacomco, 26 Portland Square, 
Bristol BS2 8RZ. 
Please send me: 


The Assembler 
ADDRESS : Development Kit at £39.95 


The BCPL 


NAME 













The Metacomco Development Kits 
are available from HMV, Menzies 
and many other leading retailers, or 
direct from Metacomco. 


Me TACO 


26 Portland Square, Bristol BS2 8RZ. 
Tel: Bristol (0272) 428781 














Development Kit at £59.95 


POSTCODE The LISP 














Development Kit at £59.95 



































TEL. NO. | enclose a cheque for £ _or 
debit my ACCESS/VISA Account No. 





SIGNATURE 





“Existing registered users can obtain an upgrade. 
Contact Metacomco for details. 





QL & QDOS are the trade names of Sinclair Research Ltd. Card expiry date: 
Price includes VAT, postage and packing UK mainland only. Delivery allow up to 28 days. QL4 j 
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Mary Sargent 





sizes up a small 





company with 





a product that 





spans several 





applications. 














“1985 is going to be a fascinating 
year. The QL is going to sell in large 
numbers, because it will be a very 
complete, very portable machine. It 
represents a milestone in computer 
hardware design, and although no- 
body really knows how big this mar- 
ket is going to be, it is certainly 
measured in millions.” So says the 
managing director of PCML Ltd, a 
leasing and brokerage firm operating 
in the IBM mainframe market, and 
not, you might think, the most im- 
mediately obvious person to expound 
on the virtues of Sir Clive’s problem 
child. In fact, so convinced is John 
Fuller that the QL is the small- 
business machine of the future that 
|‘he and his partner, Derek Batey, 
have set up a new company, called, 
appropriately, QL Plus, in order to 
design add-ons exclusively for the 
machine. 

It’s an interesting venture for a 
company with a successful business 
| which has little to do with home 
micros, and involves a demonstration 
of faith almost worthy of the master 
himself. QL Plus was set up in 
October 1984, and by November had 
a prototype add-on in sufficiently 
good working order to be demons- 
trated at the Compec Show at Olym- 
pia. It aroused a great deal of in- 
terest, and led to discussions on 
marketing and distribution with first 
Prism, and then, more importantly, 
Sinclair Research. With this sort of 
encouragement, it would seem that 
QL Plus has something rather more 
interesting than fine phrases to offer. 


Wild Card 


areas 

The first product is a CPM card for 
the QL which will give access to the 
huge range of software which the 
machine currently lacks and desper- 
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ately needs. This was one of the 
factors in the decision to concentrate 
on the QL. Identifying a specific need 
in the micro-market is vital to a small 
business intent on becoming leaders 
in the peripherals field, and since it is 
likely to be many months before the 
software backup is available in any- 
thing like the quantity or quality 
needed, access to CPM seemed a 
logical starting point. 

In its simplest form, the card be- 
comes a 64K parallel printer spooler 
for the QL, dispensing with the need 
for a dedicated printer buffer and 
ensuring a continued useful life for 
the add-on once specific QL software 
becomes available in quantity. In its 
more sophisticated application, the 
peripheral has the capability to be- 
come an intelligent floppy disk con- 
troller, courtesy of a piggy-back 
board on the card, again demonstrat- 
ing a talent for life after CPM. This 
kind of ingenuity is likely to be the 
hallmark of QL Plus products. The 
designer responsible-is Robert Har- 
vey, who joined the company in July 
1984 as “product development execu- 
tive”, a title which covers a multitude 
of sins, from dreaming up an add-on 
in the first place, to soldering the 
prototype together. He was brought 
up with the Z80 machines, which 
explains why the CPM card is in fact 
a Z80 computer plugged in to the QL 
expansion socket, but he is unper- 
turbed about working with the 68008 
processor. The levels of design diffi- 
culty vary with the type of add-on 
under development, but there have 
been no insuperable problems. So 
does designing add-ons for the QL 
involve a quantum leap in technique? 

“Not really,” says Robert. “There 
are a number of things to watch for. 
One of them is that the power supply 
can hardly cope with some add-ons, 
so you have to be careful to design the 
peripheral so that it uses very little 
power. The other problem is that it 
runs much faster than some other 
micros (about 7MHZ, as opposed to 
the Z80’s 4MHZ) so your design can’t 








be as ad-hoc as, say, something for 
the Spectrum. You have to take into 
account that certain things have got 
to be close to the bus. Design is more 
critical than it would be with other 
machines, but the CPM card was 
very easy to interface to the QL 
because everything you could poss- 
ibly need was there. Sinclair have in 
fact thought about expansion in 
terms of lots of add-ons.” 


Bad Rapport 


What Sinclair have not thought ab- 
out, however, is providing sufficient 
ports for the potential add-ons to plug 
into. “There is only one expansion 
slot and nobody seems to be in the 
business of producing multiple ex- 
pansion connectors, apart from 
Quest, who have produced one for 
their own products which doesn’t 
take standard Euro-cards. It’s no use 
to us.” The CPM card is, in Robert’s 
opinion, the most obvious extension 
to the QL. “People will want floppy 
disks and probably serial ports. The 
CPM card gives us a certain amount 
of play as to what we add on, but it’s 
essentially a stop-gap until expan- 
sion boxes come along.” This may 
mean until QL Plus finds time to 
produce one, although since John 
Fuller describes his company as 
“Under capitalised, understaffed and 
over-loaded” it may be some time 
before that is possible. 

Another thing Sinclair did not 
seem to have considered was the 
possibility of co-operating with small 
companies working to realise the 
potential of the QL. Initially, there 
were difficulties in contacting the 
right people in the Sinclair organisa- 
tion. For example, an attempt to get a 
replacement QL for the company’s 
one and only machine which had 
developed problems within days of 
the Compec Exhibition resulted in 
several frustrating hours being 
blocked by one receptionist after 
another until a helpful journalist 





suggested that John Fuller try Sinc- 
lair’s Press Office. A working compu- 
ter was then quickly forthcoming, 
and Cinderella did get to the Ball, or 
in this case, the Show, after all, but it 
was a nerve-wracking incident. An 
earlier request for information on the 
QL’s memory map elicited nothing 
from Sinclair Research but a name 
and address. That, as it turned out, 
was the most helpful information QL 
Plus could have, but at the time, it 
was discouraging to meet so little 
interest from the manufacturers of 
the machine about which John Fuller 
was so enthusiastic. 

The name was Tony Tebby, desig- 
ner of Q-DOS and great white guru of 
matters QL-ish, and it was he who 
supplied information and advice on 
the memory map and operating sub- 
routines without which the CPM 
card’s hardware would have been 
difficult, and the software impossible, 
to design. In fact, says Robert Har- 
vey, “it was very well laid out; the 
addresses you could use, information 
was given on how to make the 
interface work, and what signals you 
needed which were different from the 
standard 68000 signals.” Tony Tebby 
is now associated with QL Plus ina 
consultant capacity, and has been 
involved in the planning stages of 
future products. 


Further RAMifications 


These include a RAM card, designed 
to increase the QL’s memory banks. 


But hasn’t the beast already got more - 


memory than the average computer 
can boast in a life-time?” “The prob- 
lem,” says Robert Harvey, “with any 
machine with any amount of memory 
is that software producers always 
produce software which fills it up. 
They say, all right, we’ve 90K inside 
the QL, let’s use it to make a better 
program. And then you lose out on 
data storage for those programs. 
With Abacus, for example, you only 
have about 8K left.” He intends that 
the RAM expansion will allocate 
memory for disk drives, both the 
floppy and micro-drive variety, but 
there will still be a substantial in- 
crease in the memory available to the 
user. “Everyone always needs more 
memory!” 

The design of the RAM card was 
not quite so straightforward. “It’s a 
slightly different kettle of fish from 
the CPM card, as you need to under- 
stand the 68008 chip in much more 
detail. It’s not just a simple interface, 
because you’re adding Random Ac- 
cess Memory and you have to talk 
about refreshing and that side of 
things. So that’s a bit harder, but 
again, not that hard.” Whereas the 
CPM card communicates with the QL 
and is a micro-processor in its own 
right, the RAM card is conceived as 
being much more an integral part of 


Sinclair’s machine. One of its virtues 
will be the support it gives the 
micro-drives in terms of short-period 
storage, reducing wear and tear on 
those rather fragile cartridges, and 
speeding up the operation of the 
whole computer. 


Muddy Critique 

Pa ee ae 
Surprisingly Robert Harvey has few 
complaints about the microdrives, 
which have been responsible for a 
good proportion of criticism of the QL. 
A lot of it, he considers, may have 
been ill-informed sensationalism, 
obscuring the fact that few people 
who regularly use the microdrives 
complain. “They serve their purpose. 
In terms of the machine, they provide 
cheap, mass storage and almost ev- 
erybody would prefer them over cas- 
settes, even if they have to back-up 
their cartridges, or rotate through a 
number of cartridges to even out the 
wear.” John Fuller agrees, “Sinclair 
will solve the microdrives’ problems. 
Good drives and good cartridges give 
no trouble. It’s a matter of quality 
control, not a basic design flaw, which 
has caused the bad publicity.” 

There are, however, rather more 
serious repercussions of the bad pub- 
licity than the microdrives’ reputa- 
tion, as QL Plus has discovered. 
When the CPM card was ready for 
demonstration, the software division 
of W. H. Smith was extremely in- 
terested, not to say excited, about its 
possibilities. A meeting was set up, 
the necessary executives were duly 
impressed and asking whether it 
could be available by Christmas 
(1984), but in the event, nothing was 
finalised, because Smiths remain 
cautious in their long-term commit- 
ment to the QL. Clearly, some of the 
mud slung with such abandon when 
the QL emerged was sticky. 

The detailed talks with Prism, the 
major distributor of Sinclair products 
in the UK, which were encouraging 
the company in November, are in 
abeyance due to Prism’s current 
financial difficulties. That may well 
not matter, since Sinclair Research, 
having established that QL Plus were 
indeed worth talking to, is now tak- 
ing an active interest in letting Sinc- 
lair dealers know of the CPM card’s 
existence. So it’s happy endings all 
round, and another innovative Brit- 
ish product helping the balance of 
payments and the unemployment 
statistics, OK? Well, not quite. There 
is one giant snag, and it has nothing 
to do with British shortcomings at all. 


Transatlantic Sting 
a | 
CPM software was invented back in 
the dark ages by an American com- 
pany, Digital Research. And Digital 
Research require a license fee for 


| likely to be a fascinating year. 
























































every unit which uses CPM software. 
Furthermore, it is necessary to 
purchase these licences in advance of 
sales made, and at a price which does 
not become cost effective until the 
order is for a minimum of 20,000 
licences. At that level, the cost is 
about 7 dollars per licence, and before 
that, each licence costs anything up 
to 15 dollars. Fuller estimates that 
QL Plus might have to commit some- 
thing in the region of 150,000 unre- 
coverable dollars, without any cer- 
tain information on what the market 
for the CPM card is likely to be. 
Clearly, this kind of up-front money 
is not sitting in his petty-cash box, 
and if he is to ask for access to the 
bank’s resources, he has to fan his 
bank-manager’s fevered brow with 
some full order books. If he is to fill 
order books, he must have a large 
number of working units available. If 
he is to produce the working units, he 
needs the CPM licences and if he is to 
buy the CPM licences, he needs the 
bank’s backing, which brings the 
whole thing neatly back to full order 
books again. 


Over The Hill 


Attempts to negotiate on the problem 
have hit a language barrier — Digital 
Research have been slow to under- 
stand the word compromise. John 
Fuller is frustrated. “I’ve pointed out 
to them that we’re opening up a 
whole new market for their product 
they could never have expected. I’ve 
also told them that we need the price 
concessions on small numbers of 
licences, in order to establish the 
product. It’s no use. They have their 
structure, and that’s the way they’ve 
always operated. They can’t see any- 
one else’s point of view.” 

It is a bad case of everyone wanting 
their slice of the cake before it’s 
baked, and it’s particularly galling 
that it should involve a foreign com- 
pany which has not been noted for its 
innovative contribution to micro- 
technology in recent years. However, 
all is by no means lost. 

Digital Research is now showing 
signs of granting a price concession 
for a realistic number of licences and 
Sinclair’s chats with their dealers are 
already bringing in the first orders. 
Europe in particular is enthusiastic, 
and John Fuller is sufficiently opti- 
mistic about the CPM card’s future to 
have set up a production unit in 
Northern Ireland. This is partially 
funded by the Local Enterprise De- 
velopment Unit, a government- 
backed body whose brief is to encour- 
age industry in the area and involves 
a link-up with a firm already operat- 
ing in Northern Ireland, Circuit and 
Systems Design (CSD). It is hoped to 
start production of the CPM cards 
early in 1985. As John Fuller said, it’s 
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GARDENING PLANS? 


Let our QL programs help you. 
Shrub bank and planner with 5 programmes £11.95inc. cartridge and p&p. 


House plant bank and planner with 5 programs and 180 types of plants 
£11.95 inc. cartridge and p&p. 

















To: Toby Hodd, SuperPlantSoftware, Llangeitho, Tregaron, Wales SY25 60G 


RODENT (QL) SOFTWARE 


ADVENTURE WRITER — Design adventures easily! Up to 5 artificially intel- 
ligent characters, 24 objects and 32 rooms: chain data files to create multi- 
level adventures. Advanced language interpretation. Help routines plus full 
documentation — £19.95. 

QL ARTIST — Create marvellous pictures: design picture elements, save 
them on microdrive. Enlargements, stretches, mirror images and rotations 
can be done with ease. Combine them on screen with each other and with 
intricate line drawings to create stunning effects. Help option and full docu- 
mentation. — £12.95. 

GAMES 1 - Basic Chess, Fruit Machine, Orbiter, Mars Lander, Laserace, 
Mushroomaze and Eliza. — All for £8.50. 

GAMES 2 — Snooker Manager (plus save option), Glidepath, Bombshell, 
Mazeman, El-Dorado, Expert and Nim. — All for £9.00. 

£5 reduction if microdrive supplied. 

Rodent Software, 3 Brook End Drive, Henley-in-Arden, 

Solihull, West Midlands, B95 5JA. 


“Hungry Harry in the 
Haunted House” 


Copyright * Snowsoft * 1985 
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JOYSTICKS FOR OL 


Plugs straight into control port 1 or 2. 
NEEDS NO INTERFACE OR ADAPTER — £7.99 each or £15 for two. 
Add 50p p&p. 
Two joysticks plus CONCENTRATION (an addictive 1-4 player game) on 
microdrive cartridge for only £23.95 inclusive. Game only: £10.95 inclusive. 


Send to: COMPUTER SUPPLIES 
146 Church Road, Boston, Lincs. PE21 OJX. 


AD INDEX 


Adder Publishing Micronet 800 
Microvitec 


Butterworths Miracle Systems 


Printerland 


Sigma Research 

Simplex Data 

Sinclair 

Research 53,54,55,56,57 
Management Snowsoft 44 


Science 46 
Medic 

Datasystems Ltd 

Metacomco 

Micro APL 


“Duck from swooping 
bats, avoid the 
ghosts, eat the garlic, 
then kill Dracular 
before the coffin 
closes. 


* Multilevel Pacman 
type arcade game. 


* Fast machine code: 
graphics. 


* Large multi- 
coloured sprites. 


£12.00 (inc. p&p) 


Cheques/postal orders to 
* Snowsoft * and send to: 
6 Bousfield Crescent 
Newton Aycliffe 

Co. Durham 

Tel: (0325) 312417 








ZA Ue 


The world beating QUICKSHOT II JOYSTICK is 
now available for your QL at a price everyone can 


afford. 
Just £10.95 + £1.00 p&p or £9.56 if you buy with 


QLART. 
QL PRODUCTS — DEALERS PLEASE PHONE 












£3.95 








QLRS232 £9.00 QL Control Lead 

QL To Atari Converter Lead £4.95 

QLART The Ultimate QL Graphics Aid £15.95 

QL.Dumps machined code Dumps for popular 

printers £7.95 
* %& %& NEW QL ARCHIVER * x x 


If you want to use archive for your own professional 
database this is the program for you. Dozens of routines 
allow you to build sophisticated invoicing, addressing 


















EPROM SERVICES 
OL EXTENSIONS 


QL SER1 TO PARALLEL PRINTER ADAPTOR 


* Supplied with all cables 
* Built-in mains power supply — reduces strain on QL PSU. High power printer 


output 
* Power on RED LED indicator 
* RS232 levels — meets RS232 specification 
* Fully enclosed black box 
* Crystal controlled adjustable Baud rate — default 9600 
+ Adjustable parity/bits per character — for other computers 
* Double input buffered — no lost characters 
* SUPERBASIC and QDOS compatible — plug in and go 

Also available for ZX SPECTRUM INTERFACE | and other computers 


QL EPROM CARTRIDGE 
Fits the QL’s EPROM CARTRIDGE SLOT 


Holds two 2K, 4K or 8K EPROMs 
Allows ROM extensions to be available at power-on 
QL EPROM CARTRIDGE SOFTWARE £9.95 each 


To fit the above cartridge 

U) Utilities includes CLOCKS, TIMER, XDIR, MEM-drive, RPP. 

B) Basic + 1 includes TRACE, RENAME, LIST VARS, LIST PROCs, BIN, HEX, 
PUT, GET, LIST NAME. 

J LIST, J RUN, J STOP, SPOOL, J REG, B REG. 

CHGEM, FONT,-UDG, PIX, VSCROLL, CSCROLL, 


CHAR, MOVE MEM. 
Up to 8 sets of software may be fitted to a single cartridge. 


Introductory offer: U)B) on cartridge 


QL CABLES 


T) Multitasking includes 
G) Graphics includes 


OL SER with 1.Simetres abla’ scopissveossinscosinisniseaaranssiatesisauanresenvinivialenatiennsd £3.95 
QL CTL with 1.5 metres cable... £3.95 
MICRODRIVE approx 8” 
QL SERIAL CABLE 






and stock control packages at a fraction of the cost of 
other programs! 
* £14.95 Standard * £35 deluxe (tailor made) 


Phone 01-478 1291 for details 
or send a cheque or PO payable to 
EIDERSOFT, FREEPOST 
FREEPOST, PO BOX 54, ILFORD IG1 1BR 












Please send for full details and current software developments 





EPROM SERVICES 
3 Wedgewood Drive, Leeds LS8 1EF 
Tel: (0532) 667183 


Nig-Tol-M-Talem->¢olelam=lare [Ul a(-tmi\ evel aat= 





WITH MARCH ISSUE OF SINCLAIR USER 


GIANT CUTAWAY POSTER of the Spectrum anatomy, displaying 
the circuit board, chips, resistors, capacitors, heat sink — 
everything, in fact, that you ever wanted to know about the internal 


workings of your home computer 





PLUS 


@ PIXEL PAINTER Ann Hughes of Psion 
demonstrates the mind-bending intricacies of 
the Match Point and OL Chess graphics 

@ PROGRAMMING MAESTRO John Gilbert shows 
how to create character reaction and interaction 
in the second part of our Al adventure series 

@ FIRST INSTALMENT of a complete course for 
Spectrum beginners 

@ OL INVADERS are here at last! Juice up you OL, 
and fill the holes in the User Guide, with our 


user-defined graphics program 


oO 


ig 


month by placing an order with your newsagent | 


now. 
Please reserve a copy of Sinclair User for me next 


month/every month* *delete as applicable 








PNGGOSS: scsnisccncncnnsnniiincosd one sieirsmenduchiensasnysieuiuenuutihistuelconeneates 


Sinclair User is published monthly by EMAP | 
Business & Computer Publications. . 
| 

| 
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THE ASSEMBLER 


The ADDER 68K Assembler is a professional, fully integrated 
editor/MACRO assembler development package for the QL. 
Providing a quick turn-around on the editing, assembling, 
debugging cycle, it assembles Motorola format source files to 
produce multi-tasking programs, additional Super BASIC 
facilities plus much more. Features include: 

* FULL 68000 MACRO Assembler 

* Integrated full screen editor 

* Conditional assembly 

* External library file inclusion 

* Complete error checking diagnostics 

* Comprehensive manual 

*x MACRO ASSEMBLER only £29.95* 











ADVANCED 
USER GUIDE 


ADRI AN DICKENS 





_THE BOOK 


The QL Advanced User Guide (£12.95*) has been written by 
Adrian Dickens in tothe with Tony Tebby (QDOS 
System designer). It is the complete guide to QDOS and the 
Sinclair QL, covering multi-tasking, transient programs, 
resident procedures, heaps and stacks, traps and utilities, 
68008 assembler programming plus much more. All of these 
features are illustrated by practical examples, and the 
powerful QDOS experimentor program allows many facilities 
to be tried out from BASIC. All of the programs from the book 
are available on a microdrive cartridge which can be 
purchased with the book (£9.95"*). 
eo 
ORDER FORM 
CO Assembler development package £34.95 incl. VAT and p&p 
CO QL Advanced User Guide Book £14.45 incl. p&p (no VAT) 
O1QLA.U.G. programs from book £11.95 incl. VAT and p&p 
C1 OFFER — ABOVE 3 items £55.95 ALL INCLUSIVE 
U Blank Microdrive Cartridges £4.95 incl. VAT 
| enclose cheque/PO for £ uo... seseeseeseeteeseeneeseeees 
























GiVSivnctsaaetiussverseveniers POSICOO Cis ccvicvsssssesncsrccrnenss 
Send to: ADDER PUBLISHING LIMITED, 

P.O. Box 148, Cambridge CB1 2EQ 

Dealer enquiries welcome 


QL and QDOS are trademarks of Sinclair Research Limited 
* Price excluding VAT and pap 


ADDER 


QU/3/85 
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QL BARGAINS 


Prices include VAT and carriage 


QL COMPUTER — ONLY £379 


Psion Chess 

Transform box for 20 cartridges 

10 Microdrive carts+ Transform box 
Serial cable (S) £11 


4 Microdrive carts 


Brother HR5 (S) 
Shinwa CPA80P (P) 
Epson RX80FT (P) 
Taxan KP810 (P) 
Smith Corona TP-1 (S) 


Brother M1009 (S&P) 

Mannesman Tally MT80 219 
Cannon PW1080A (P) £319 
Daisy Step 2000 (P) £264 


MONITORS 


Microvitic CUB 1451/DQ3 £259 Prism QL14 
Philips Hi-res monochrome 


MODEMS 


QCON Interface with microdrive software 
Q MOD Modem with full duplex operation 
QCALL Auto dial answer unit 


QCON + QMOD 
DISK DRIVES 


Single 3.5in. 720K DS 80T-DRIVE with interface to QL 
Single 3.5in. 720K DS 80T-DRIVE (second drive) 


SOFTWARE 


Please call for latest prices 
Metacomco ASSEMBLER — BCPL — LISP — CASH TRADER 


STRONG COMPUTER SYSTEMS 


Bryn Cottage, Peniel, Carmarthen, Dyfed, SA32 7Du. 
Tel: (0267) 231246 for assistance anytime!!! 


OL COMMPAK 


MULTI STANDARD ACOUSTIC MODEM 
AND PRINTER CONTROLLER 
~ ‘ONLY £140 INC. 


Plugs into SER2 port of OL using OL Serial Cable (not 

supplied). Accepts phone handset for quick anit simple 

connection. 

Modem Speeds — 300/300, 1200/75 (PRESTEL), 
1200/1200 

Standards — Bell 103/113, CCITT V21, CCITT V23 

300 Baud Modes — Originate or Answer 

1200 Baud Modes— Standard or Equalized (for noisy 
lines) 

On board Microcomuter controls speed conversion, 

buffering and Modem operation. EPROM firmware 

allows for future developments. In 1200/1200 Mode, 

Micro uses ‘Packet’ techniques to avoid collisions and 

allows fast data transfer between COMMPAK Users. 

Printer mode provides Serial to Centronics conversion. 

uses standard printer cable (available at £15 inc.). 

Modem ‘Log’ function copies 300 Baud line data to 

printer. 

QOL terminal emulation software package, available 

free, if micro drive cartridge supplied with order. 

Otherwise £5.00 inc. 

Make cheques/POs payable to COMMPAK DATA. Prices 

include VAT and p&p. Allow 28 days for delivery. 


COMMPAK DATA 


13 Beechwood Road, Uplands, Swansea 


e DIY Assembler ¢ 





The first of three articles describing a practical assembler, 








written entirely in Sup-erBasic by Giles Todd. 









This type-it-yourself 
assembler is called QONAIL 
‘(as a reflection on its rather 
less than lightning speed of 
execution) and will correctly 
assemble all 68008 
instructions as well as 
support the assembler 
directives ORG, END, EQU, 
DC and DS. If you have the 
patience, it can be used for 
serious work and has already 
been used to develop amongst 
other things a machine code 
debugger. 


Free And Easy 


So much for QSNAIL’s 
credentials — how do you use 
it? The first thing that any 
assembler needs is a source 
program and this is created 
using the Quill. The source 
layout can be free format —I 
use tabs to separate the label, 
mnemonic, operand and 
comment fields. The 
assembler expects you to use 
Motorola standard notation 
(including the requirement 
that mnemonics should be in 
upper case letters) with some 
‘minor changes: 


1) Labels and symbols must 
be followed by a colon (:) 
character when first 
defined and only the first 
eight characters of a label 
or symbol are significant. 
eg LABEL: 

2) Comment fields must be 
preceded by an asterisk (*) 
character. 

3) The expression evaluator 
is very limited — arithmetic 
expressions must be 
surrounded by square 
brackets and only the 
binary ’+’ and ’~’ 
operations are supported. 
The use of *’ to signify the 
current value of the 
program counter is also 
supported. 
eg HERE: EQU [*— 
LABLE] 

4) When using the DC.B 

directive, ASCII strings 

must be specified with each 
character surrounded by 
single quotes and 
separated by commas. 

eg STRING: DC.B ’A’,’S’, 

"CY, ls dl 

To include spaces, use 

EQU to set a symbol to 32 

and then use the symbol 

wherever you want a space 
in the string. 








When complete, the source 
program should be PRINTed 
(not SAVEd although this 
can be done as well if desired) 
to amicrodrive file. There 
should be no preamble of 
printer control codes and any 
page headers or footers 
should be preceded by a’ 
character so that the 
assembler can treat them as 
comments. The default 
PRINTER_DAT file supplied 
with the Quill works fine. NB 
—if you want to re-edit your 
source file at a later stage, 
you will have to IMPORT it to 
the Quill—it will not load 
unless you SAVEd it as well 
as PRINTing it toa file. 

Having prepared the 
source program, the next step 
is torun the assembler. When 
it has loaded, it will first 
prompt for an input filename 
and you should enter the 
name of the PRINTed Quill 
file you have just prepared. 
Then it will prompt for an 
output filename — this file will 
be the destination for your 
assembled machine code. 
Finally it will ask you where 
you want the listing file to be 
sent. Your input should bea 
valid QDOS device name (eg 
’scr_’ or ’ser1’) or a microdrive 
filename (handy if you 
haven’t got a printer). The 
assembler will now get on 
with its business. 

The first pass is mainly 
concerned with setting up the 
symbol table (currently 
limited to amaximum of 200 
entries — this can be changed 
by modifying the value of 
*max_symbols’ which is set at 
the beginning of the 
procedure ’initialise_arrays’) 
so that forward references 
can be resolved during the 
second pass. During the first 
pass, each line is read from 
the source file, examined to 
see how many bytes are 
required for the instruction 
and, ifthere is a label, a 
symbol table entry is created 
to locate it. 


Deleting Errors 

The number of errors are 
reported as they occur and at 
the end of the first pass, if any 
have been detected, and the 
program stops. Ifno errors 
are detected, the program 
proceeds onto the second pass 





where the completed symbol 
table is used to create the 
assembled object code. 

Unfortunately, no address 
information is stored in the 
object file. If, as you should 
be, you are writing position 
independent code, this does 
not cause great problems but 
the object file needs to be 
loaded manually. First, 
reserve some memory with 
the ’respr’ statement and 
then use ’1bytes’ to load the 
object file. If your routine is 
intended to be a resident 
procedure, simply use ’sbytes’ 
to save it back to file with the 
correct load address. Ifitis 
intended to be a multi- 
tasking job then use’sexec’. 

Although the assembler as 
it stands at the moment 
works reliably and correctly 
(albeit slowly), there area 
number of enhancements 
which could (and probably 
should) be made. Most 
obviously, in the procedure 
*pseudo_op’ you will see that 
three assembler directives 
(SET, REG and DCB) are 
included but only return the 
message ‘not implemented’. 
In practice, I have found that 
they are unnecessary for 
most program development. 

The prime area for 
enhancement is the second 
pass main loop. At the 
moment, much of what is 
done in the first pass in terms 
of identifying the instruction 
type and addressing modes is 
duplicated in the second pass. 
If instead, the first pass loop 
wrote this information toa 
temporary file to be used in 
the second pass, the second 
pass would probably run 
more quickly. 

Yet another area for 
enhancement is the table 
searching functions and 
procedures ’find_symbol’, 
’add_symbol’ and 
’mnemonic’. At the moment, 
they simply do a sequential 
search through the symbol 
table and the mnemonic list. I 
have made a small concession 
towards optimising for speed 
by ordering the array 
’mnemonic$’ in such a way 
that the most frequently used 
instructions appear first. 
However, ifthe program 
were altered to use a binary 
search or (probably even 


the symbol’s address else 








better) hash coding, there 
would be an overall 
improvement in speed. 
Ifanyone makes any 
improvements in these or 
other areas (anyone for 
macros?), we would be very 
interested to hear from them. 


QSNAIL: Procedures 
and Functions 


FuNction hex(h$)... 
Converts the hex number in 
h$ to decimal. 

PROCedure screen... 
Sets up the initial screen 
parameters. 

FuNction file_prompt$... 
Gets the input, output and 
listing filenames. 
PROCedure open_file (f$). 
Opens the file with name f$ as 
channel 5. 

FuNction read_line$... 
Returns the next non-blank 
line from the source file. 
PROCedure close_file... 
Closes the file attached to 
channel 5. 

FuNction next_field$ (1$). 
Returns the next field (lable, 
mnemonic, operand or 
comment) from the line in 1$. 
PROCedure initialise_ 
arrays... 

Sets up the constants and 
arrays used by QSNAIL. The 
arrays are: 


Mnemonic$ 
mnemonic list 





symbol$ 
symbol table 





symbol_address 
symbolor label addresses — 
same index as symbol$ 





condition$ 
condition code mnemonics 





cond% | 
condition codes— same 
index as condition$ 





word 
used for bringing up the 
object code 





shift 
table of powers of 2— 
precalculated to save time 
building the object code. 





FuNction find_ 
symbol(operand$)... 
Searches the symbol table for 
operand$. Iffound, returns 
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20 


40 
50 
60 
70 


90 

100 
110 
120 
130 
140 
150 
160 
170 
180 
190 


ine 
340 
350 
360 
370 
es) 
380 
390 


returns 2/433 (used alotasa table to address. 

*not found’ flag). FuNction count_operands 
PROCedure add_ (operand$)... 
symbol(f$,pc)... Returns the number of 

Adds the symbol in f$ with operands in operand$. 
address pc to the symbol FuNction first_operand$ 
table. (operand$)... 

FuNction mnemonic(f$)... | Extracts the first operand 
Searches the mnemonic list from operand$. This and the 
for a match with f$. If found, next function are used to 
returns instruction type separate the source and 
number (0 to 63 — includes destination operands of a 
pseudo-ops). Ifnot found 68008 instruction. 
returns—1. FuNction second_ 
FuNction ferror operand$ (operand$)... 
(ferror$,ec) Extracts the second operand 
Prints the error message in from operand$. 

ferror$ and returns updated FuNction operand_ 

error counter ec. type(operand§, field$,sd$). 
PROCedure pseudo_ A big one. Returns the 
op(1$,f$,pce)... addressing mode number (1 
Handles assembler directive to 16) of the supplied operand. 
processing. FuNction 


FuNction dec2hex$ (i,flag). | overhead(type,f$,s$)... 
Converts the decimalnumber | 68008 instructions can be 





into a hex string. If flag=0 from two to ten bytes long. 
then it ensures that the This function returns the 
returned hex number is five overhead in bytes of the 
digits long— handy for 68008 addressing mode number in 
addresses. type. 

FuNction eval(t$)... FuNction short_ 

Attempts to evaluate t$ branch(f$, link,operand$). 
whether it be an expression, Tests to see if f$ is a short 
symbol, label or whatever. branch instruction. Returns 1 
Returns the value of the ifitis else returns 0. 

string ifsuccessful, otherwise | FuNction branch (f$,link). 
returns 2/33. Tests to see if f$ is along 
PROCedure change_ branch instruction. Returns 1 
symbol(label$, address)... | ifitis else returns 0. 

Changes the value ofa PROCedure reset_ 


symbol already in the symbol pointer(f$)... 


1 REMark ##*#* QSNAIL 


2 REMark ##+* DIY 68008 EHH 
3 REMark *###* TWO PASS ASSEMBLER *#x«« 
4 REMark #*#** BY GILES TODD HEE 
9 REMark **** QL USER 1985 HEHE 


30 REMark first pass 


initialise_arrays. 
screen 
filename$=file_prompts 


80 open_file filenames 


Program_counter=0;:REMark default pc 
error_count=0 
REMark first pass main execution loop 


pass=0 

PRINT:PRINT “First pass":PRINT 

REPeat first_pass 

label$="" 

REPeat loop 

line$=read_lines 

whole_line#=line¢ 

field$=next_field¢(lines) 

IF field#<>"" THEN EXIT loop 

END REPeat loop 

IF field$="END" THEN EXIT first_pass 

IF field#(1 TO 1)="*" THEN NEXT first_pass 

IF field#(LEN(field#) TO)=":" THEN 
label$=field#(1 TO LEN(fields)-1) 
IF LEN(label$)>8 THEN 

label#=label#(1 TO 9) 

END IF 


IF find_symbol (label#)<>2*33 THEN 
error _count=ferror (field$&" multiply def 
d",error_count) 
NEXT first_pass 
ELSE 
add_symbol label$,program_counter 
IF LEN(line$)>0 THEN field$=next_field$(lin 
END IF 
END IF 
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‘S30 IF LEN(line*)=0 THEN NEXT first_pass 





of a 68008 instruction 







































Does a’rewind’ of the source 

file f$ by closing and depending on whether the 
reopening the file. source instruction has a’.B’, 
PROCedure print_ *.W’,’.L’ or no extension. 
object(o$)... FuNction inside(s$,f$) ... 
Prints the assembled object *TRUP’ or ‘FALSE’ version of 
code to the listing file. instr’. 

FuNction PROCEDURE STATUS... 
evs$(number,length)... Generates the object code for 
Converts number to a binary instructions involving the 
number of length bytes ina status register or the user 
format suitable for writing to stack pointer. 

the object file. PROCedure 

PROCedure reglist(temp$,dtype)... 
evaluate(mn$,src$,dest$, Used in setting up a register 
link,stype,dtype)... list extension word for the 
Actually produces the MOVEM instruction. 
machine code. Uses the FuNction expression 
procedures link0 to link55 to (t$)... 

generate the binary object Attempts to evaluate 

code for each instruction arithmetic expressions. This 
type. is the one to look at if you 
FuNction reg(r$,type)... want to improve QSNAIL’s 







Returns the three bit register | expression evaluation 
field of a 68008 instruction for | capability. NB—this 




























the addressing mode in type. procedure is called from eval 
FuNction amode(type)... and, in its turn, calls eval 
Returns the three bit mode itself, making it recursive. It 
field for the addressing mode hasn’t hung up on me yet— 

in type. touch wood! 

PROCedure opcode... PROCedure operr... 
Generates the extension General purpose error 

words required for the message for second pass 
addressing modes in stype operand errors. If you get this 
and dtype. error message, check that 
PROCedure pcrel(op$)... both your source and 
Calculates displacements for destination addressing modes 
program counter relative are legal. 

addressing modes. PROCedure tape... 
PROCedure sizetemp... Handy for saving the 






Sorts out the two bit size field | program. 








400 link=mnemonic (field$) 
410 IF link=-1 THEN 

420 error _count=ferror (field$&" not found in mn 
emonic list",error_count) 

430 NEXT first_pass 

















440 END IF 

450 : 

460 REMark is it a pseudo-op? 

470 : 

480 IF link>=56 THEN 

490 Pseudo_op label$,field*,program_counter 
500 NEXT first_pass 

510 END IF 









520 program_counter=program_counter+2 







540 IF field$="MOVEQ" THEN NEXT first_pass 

SSO operand$=next_fields(line$) a 

560 IF operand$="" OR operand$(1)="*" THEN NEXT i 
rst_pass 

570 IF count_operands (operand#)=1 THEN 

580 sour ce#=oper and 

590 destination¢="" 

600 END IF 

610 IF count_operands (operand$)=0 THEN 

620 error_count=ferror (whole_line$&" - illegal 
oper and" ,error_count) 

630 NEXT first_pass 

640 END IF 

650 IF count_operands(operand$)=2 THEN 

660 source$=first_operand$ (oper and$) 

670 destination$=second_oper and$ (oper and$) 

680 END IF 

690 : 

700 REMark determine source operand type 

710 =: 

720 source_type=operand_type (sources, field¢,"s") 
730 : 

740 IF source_type=0 OR source_type=8 OR source_ty 
pe=9 THEN 

750 IF short_branch (field¢,link,source$)=1 THEN 






























760 NEXT first_pass 
770 END IF: 
780 IF branch(field#,link)=1 THEN 







790 program_counter=program_counter+2 
800 NEXT first_pass 
810 END IF 
820 END IF 
830 program_counter=program_counter+overhead (sourc 
e_type,field#,source$) 
840 IF destination$="" THEN NEXT first_pass 
850 : 
860 REMark evaluate destination oper and 
870 =: 
880 destination_type=operand_type(destination$,fie 
ld#,"d") 
890 IF branch(field$,link) THEN Program_counter=pr 
ogram_counter+2:NEXT first_pass 
900 program_counter=program_counter+overhead (desti 
nation_type, field#,destination$) 
910 END REPeat first_pass 
915 old_pc=program_counter 

IF error_count>0 THEN 

display_errors error_count 
close_file filenames 
CLOSE #channel 


reset_pointer filenames 
Program_counter=0:REMark default Pc again 
length=0 

error_count=0 


1050 REMark second pass main execution loop 
1060 =: 
1070 PRINT \"Second pass"\ 
1080 pass=1 
1090 REPeat second_pass 
1100 object¢="" 
1110 label¢="" 
1120 REPeat loop 
1130 lines=read_lines 
1140 whole_line$=lines 
1150 field$=next_field$ (lines) 
1160 IF field$<>"" THEN EXIT loop 
1170 END REPeat loop 
1180 PRINT #channel ,dec2hex$(program_counter ,0O); 
1190 IF field#="END" OR field$="end" THEN EXIT sec 
ond_pass 
1200 IF field$(1)="*" THEN PRINT #channel,TO 273wh 
ole_line#;:NEXT second_pass 
1210 IF field#(LEN(field#) TO)=":" THEN 
1220 label#=field#(1 TO LEN(field$)-1) 
1230 mnem#=next_field¢ (lines) 
1240 operand$=next_field? (lines) 
1250 ELSE 
1260 mnen¢=fieldt 
1270 oper and#=next_field#(line#) 
1280 END IF 
1290 IF operand$="" THEN operands="*" 
1300 IF operand$(1)="*" THEN 
1310 sources="" 
1320 destination$="" 
1330 ELSE 
1340 IF count_operands (operand#)=1 THEN 
1350 sour ce$=oper and¢ 
1340 destinations="" 
1370 ELSE 
1380 source$=first_operand$ (oper and$) 
1390 destination#=second_operand$ (oper and$) 
1400 END IF 
1410 END IF 
1420 Llink=mnemonic (mnem#) 
1430 IF link>=56 THEN 
1440 line#=oper and 
1450 pseudo_op label%,mnem$,program_counter 
print_object (object#) 
PRINT #channel,TO 27;whole_lines; 
NEXT second_pass 
END IF 


IF link=4 THEN 
evaluate mnem$,sources,"",link,source_type 


Print_object (object) :PRINT #channel,TO 27 
swhole_line$;:PRINT #6,object$; 
1540 NEXT second_pass 
1550 END IF 
1560 : 
1570 REMark evaluate source operand 





1580 : 
1590 source_type=operand_type( (sources) ,mnem$,"s") 
1600 IF source_type=8 OR source_type=9 THEN 
1610 address=find_symbol (source$) 
1420 IF address=2*°33 THEN 
1430 error_count=ferror ("Undefined label 
&whole_line#,error_count) 
1640 NEXT second_pass 
1650 END IF 
1660 source#=address 
1670 END IF 
1680 : 
1690 REMark evaluate destination operand 
1700 =: 
1710 IF destination#<>"" THEN 
1720 destination_type=operand_type( (destinations) , 
mnem$,"d") 
1730 IF destination_type=8 OR destination_type=9 T 
HEN 
1740 address=find_symbol (destination?) 
1750 IF address=2°33 THEN 
1760 error_count=ferror ("Undefined label - " 
&whole_line$,error_count) 
1770 NEXT second_pass 
1780 END IF 
1790 destination$=address 
1800 END IF 
ELSE 
destination_type=0 
END IF 


REMark evaluate instruction & POKE into memor 


evaluate mnem$,source$,destination$,link,sour 
ce_type,destination_type : 
1880 print_object (objectS):PRINT #channel,TO 27;wh 
ole_line$;:PRINT #6,object$; 
1890 END REPeat second_pass 
1892 PRINT #channel,\"First pass pc = 
ld_pc,O) 
1895 PRINT #channel ,CHR$(12):CLOSE #3 
1900 CLOSE #6 
1920 IF error_count>0O THEN 
1930 display_errors error_count 
1940 close_file filenames 
1950 STOP 
1960 END IF 
1970 : 
2000 close_file filenames 
2010 STOP 
2020 =: 
DEFine FuNction hex (h#) 
LOCal i,j,decimal 
decimal=0 
FOR i=1 TO LEN(h$) 
j=-1 
REPeat find_hex 
j=j+1 
IF h#(i)=hex#(j+1) THEN EXIT find_hex 
END REPeat find_hex 
decimal=decimal +j*146* (LEN (h#) -i) 
END FOR i 
RETurn decimal 
END DEFine hex 


DEFine PROCedure screen 
2180 MODE 4 
2185 CLS:CSIZE #1,2,1:PRINT TO 
2190 CSIZE #1,1,0:PRINT TO 17; 
2200 END DEFine screen 
2210 =: 
2220 DEFine FuNction file_prompt$s 
2230 LOCal filename$#,loop,at 
2250 INPUT "Input filename? "3;filename 
2260 INPUT "Output filename? "soutfile¢ 
2280 INPUT "Send listing to? "schannel$¢ 
2310 IF channel$(1 TO 3)=="mdv" THEN DELETE channe 
1$;O0PEN_NEW #3,channel$:ELSE OPEN #3,channel$ 
2315 channel=3 
2320 RETurn filenames 
2330 END DEFine file_prompt¢ 


“sdec2hex#(o 


14; "QSNAIL" 
1984 Giles Todd"\\ 


DEFine PROCedure open_file(f#) 
OPEN_IN #5,f% 
END DEFine open_file 


Next month: the main routines’ source code. : 
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THE PROGS 


This is the place to look for readers’ QL programs. So, if you’ve got a computational 











masterpiece, why not send it in for evaluation. The address is ‘The Progs’, QL User, 
Priory Court, 30-32 Farringdon Lane, ECIR 3AU. We pay for everything published. 


























Pacman 
Steve Deary 


Despite the absence of REM 
statements the following 
Pacman type game, well 
structured with meaningful 
data-names, should be 
reasonably self-explanatory. 

The object of the game is to 
guide a “man” about amaze, 
consuming everything as you 
go but at the same time 
avoiding being eaten by 
‘ghosts’. The man may be 
controlled by joystick or cursor 
coutrol keys. The level of 
difficulty increases with each 
screen successfully negotiated. 
By the fourth screen the maze 
itselfis invisible. 

The ‘ghosts’ speed of 
movement is controlled by the 
variable ‘handicap’ which is set 
up in line 160. For an easier (or 
more difficult) game you can 
try altering the handicap by 
one or two. Fine tuning of the 
speed of play can be achieved 
by adjusting the random 
number value in line 190 
(currently 30). 

User defined characters are 
set up using the procedure at 
line 1370. Each window can 
have two character sets (leave 








the first alone as it contains the 
standard ASCII characters). 
Setting up your own 
characters cannot be done 
directly in SuperBasic but 
needs a small machine code 
routine (just six bytes). When 
this routine is CALLed three 
variable parameters must be 
supplied: 

start address = the 

address where the machine 

code has been POKEd into 
memory. 

register a0 = the ‘channel 

Id’ for thé window you are 

using (65537 for the 

standard output channel). 
register a2 =the address 
where the table defining 
your characters has been 

POKEd into memory. 

In this program line 1440 
contains the six bytes of 
machine code, and the 
character definition table 
starts at line 1450 and contains 
two bytes. These tell QDOS 
that the first character in the 
set is going to be ASCII 
character number 128 and that 
there are six other characters 
(ie 128 to 134). 

Each line 1460 to 1520 
represents one character in the 
new set. Each number in the 
DATA statement represents 
the bit pattern for one pixel row 
of the new character (note: 
usually only bits two to six 
inclusive are used). 

Therefore, if you wished, you 
could add more characters to 
the set simply by: 

—inserting extra DATA 

statements after line 1520 
—increasing the number of 

bytes being POKEd into 

memory in line 1420. 

—tell QDOS about the extra 
characters by altering line 

1450. 


10 REMark ###* QL USER 1985 x#*#* 
20 REMark #*#*# PAQMAN :Author SN Deary BSc **** 


100 initialise 

110 REPeat forever 
120 
REPeat screens 


score=0: lives=3: screen=1 


TO 300:i=i:REMark delay 


140 ghosts=screen-1:IF ghosts>2:ghosts=2 
150 drawmaze 

160 handicap=screent+4 

170 REPeat moves 

180 move_man 

190 IF RND(30) <handicap: moveghost (RND(ghosts) ) 
200 IF end_of_screen:EXIT moves 

210 END REPeat moves 

220 IF max=0 

230 CLS:AT 5,12:FLASH 1 

240 PRINT "Bonus ";screen; "000" 

250 score=score+ (screenk"000") 

260 FLASH O:FOR i=1 

270 screen=screenti 

280 END IF 

290 IF lives<1:EXIT screens 

300 IF screen>19:EXIT screens 
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310 
320 


END REPeat screens 
CLS 


330 IF screen>19 

340 PRINT "You have won the title of Grand Maste 
| a 

350 PRINT "Too good for this game. I concede!!" 
340 STOP 

370 END IF 

380 AT 5,10:FLASH 1 


390 
400 


PRINT "GAME OVE R" 

FLASH O:FOR i=1 TO. 1000:i=i:REMark delay 
410 IF score>top_score:top_score=score 

420 END REPeat forever 

430 : 

440 DEFine PROCedure move_man 


450 INK 2 

460 key=KEYROW(1) 

470 row=man_row:col=man_col 

480 IF key&&2:col=col-1:IF col<O:IF row=5:col=18: 
ELSE col=0 


490 IF key&&16:col=col+1:IF col>18:IF row=5:col=0 
zELSE col=18 

S00 IF key&&4:row=row-1:IF row<O:IF col=9:row=10: 
ELSE row=0 

S10 IF key&&128:row=row+i:IF row>10:IF col=9:row= 
O:ELSE row=10 

520 prize=maze(row,col) 

S30 IF (prize&&1) OR key=0:RETurn 

540 IF prize&&16:gotcha:RETurn 

SSO AT man_row,man_col*2:PRINT "— "5 


560 INK 6:AT row,col*2:PRINT man$; 

570 BEEP 200,max 

580) maze(row,col)=0 

590 =#IF prize 

600 score=scoretprize 

610 max=max—-1:1F max<1:end_of_screen=true 

620 AT#4,0,6:PRINT#4, scores 

630 END IF 

640) man_row=row:man_col=col 

650 END DEFine 

660 : 

670 DEFine PROCedure move_ghost (x) 

680 row=ghost_row(x):col=ghost_col (x) 

690 not_moved=true 

700 IF ABS (man_row-row)<ABS (man_col-col) 

710 horizontal:IF not_moved:col=ghost_col (x): ver 
tical 

720 ELSE vertical: IF not_moved:row=ghost_row(x): 


horizontal 


730 END IF 
740 END DEFine 
750 : 


760 DEFine PROCedure vertical 


770 =IF row=man_row:RETurn 

780 IF man_row<row 

790 row=row-1:IF row>=0:moveit 
800 ELSE 

810 row=rowti:IF row<=10:moveit 
820 END IF 

830 


END DEFine 


840 : 

850 DEFine PROCedure horizontal 
860 IF col=man_col:RETurn 

870 IF man_col<col 

880 col=col-1i:IF col>=O:moveit 
890 ELSE 

900 col=col+1:IF col<=18:moveit 
910 END IF 

920 END DEFine 

930 =: 

940 DEFine PROCedure moveit 


950 
960 
965 
970 
980 


IF (maze (row,col)&&17) =RETurn 

INK 4:OVER -1 : 

not_moved=false 

AT ghost_row(x) ,2*ghost_col (x) :PRINT ghost 
maze (ghost_row(x) ,ghost_col (x) )=maze (ghost_ro 


w(x) ,ghost_col (x))-16 
9790 AT row,2*col:PRINT ghost 
1000 


maze (row,col)=maze(row,col)+16 















»byte 
1430 
_a0,O0 
7440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
15460 
1570 
1580 
1590 
14600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
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ghost_row (x) =row: ghost_col (x) =col 

OVER 0 

IF row=man_row AND colsman_col:gotcha 
END DEFine 


DEFine PROCedure gotcha 
end_of_screen=true 
lives=lives-1 
BEEP 30000,1,255,200,4,2 

END DEFine 


DEFine PROCedure initialise 
set_up_user_defined_chars 

MODE 8 

true=1:false=0 

top_score=0 

CSIZE 2,1 

OPEN#S , scr _512x256a0x0 

PAPER#3,0:CLS#3 

SCALE#S ,256,0,0 

OPEN#4, scr_456x 10a32x14 

WINDOW 476,230,23,26 

BORDER 5,2 

BLOCK#3 ,24,5,248,26,1 
BLOCK#3,24,5,248,251,1 
BLOCK#3,10,20,23,131,1 
BLOCK#3,10,20,489,131,1 

DIM maze(10,18) ,man$(2) ,maze# (2,2) 

DIM ghost#(2) ,ghost_row(2) ,ghost_col (2) 
man#=CHR$ (131) &CHRS (132) 
ghost$=CHR$ (128) &CHRS (129) 

mazes (0) =CHR#(133)&" " 

maz e¢ (1) =CHR# (134) &CHR$ (134) 

maze (2)=CHR$(130)&" " 
END DEFine 
DEFine PROCedure set_up_user_defined_chars 
start_address=RESPR (100) 
register_a0=465537 
register_a2=start_address+é 

RESTORE 1440 

FOR i=0 TO 70:READ byte:POKE start_address+i 


CALL start_address,0,0,255,37,0,0,0,register 

sregister_az2. 

DATA 32,4,78,67,78,117 

DATA 128, w 

DATA 4,8,16,44,76,64,84,84,0 

DATA 64, 32, i6, 104, 100, 4,84,84,0 

DATA 0,0,0,0,4,0,0,0,0 

DATA 124,60,36,60,124,24,24,56,0 

DATA 124,120,72,120,192,48,48,56,0 

DATA 0,40,16,56,124,124,124,56,0 

DATA 40,56,56,124,124,124,124,40,108 
END DEFine 


DEFine PROCedure drawmaze 
max=139: end_of_screen=false 
RESTORE 1400 
READ man_row,man_col 
FOR i=0 TO 2:READ ghost_row(i) ,ghost_col (i) 
DATA 5,0,5,8,5,9,5,10 
IF screen MOD 4:PAPER 2:ELSE PAPER 1 
CLS: CLS#4 
RESTORE 1950 
PAPER 1:INK 4 
FOR row=0 TO 5 
opposite_row=10-row 
FOR col=0 TO 9 
opposite_col=18-col 
READ prize:maze(row,col)=prize 
maze (row,opposite_col)=prize 
maze (opposite_row,col)=prize 
maze (opposite_row,opposite_col)=prize 
IF prize>i 
IF prize=2 
chars#=maze$ (2) 
ELSE IF prize=6: chars$=maze$(0):ELSE cha 


rs$=maze# (1) \ 
END IF 
AT row,col#2:PRINT chars$; 


1770 
1780 


1790 AT opposite_row,col*2:PRINT chars; 
1800 AT opposite_row,opposite_col*#2:PRINT char 
ss; 

1810 AT row,opposite_col#2:PRINT chars; 
1815 END IF 

1820 END FOR col 

183Q END FOR row 

1840 AT 5,16:0OVER -1:INK 4 

1850 FOR i=0 TO ghosts:PRINT ghost$;:maze(5,8+i)= 
17 

1860 AT man_row,2*man_col:OVER O 

1870 maze(man_row,man_col)=0 

1880 INK 6:PRINT man$; 

1890 key=KEYROW(1) 

1900 PRINT #4,"Press any key to start"; 

1910 a$=INKEY$ (- 1):CLS#4 

1920 AT#4,0,0:PRINT#4, "SCORE: "3 score; 

1930 AT#4,0,13:PRINT#4,"TOP SCORE: ";top_score; 
1940) AT#4,0,31:PRINT#4, "LIVES: "3 lives 

1950 DATA 2,2,2,2,2,2,2,2,1,2 

1960 DATA 4,1,2,1,1,2,1,2,2,2 

1970 DATA 2,1,2,2,2,2,2,2,1,1 

1980 DATA 1,1,1,2,1,2,1,2,1,8 

1990 DATA 1,2,2,2,1,2,2,2,2,2 

2000 DATA 2,2,1,2,2,2,1,2,1,1 

2010 END DEFine 


File Probe 


Adam Denning 


This short program is a very 
useful utility which dumps out 
the contents of a microdrive file 
(or indeed any QL device 
capable of input) to a specified 
output device, which may be 
the screen, a printer ora 
microdrive file. The contents of 
the file are printed out in 
hexadecimal and ASCII, with 
eight bytes per line, which 
means that ifthe output is 
being directed to the screen it’s 
only really effective in mode 0. 
The program is written so that 
it can be used as a multi- 
tasking job, by EXECing it, or 





as a piece of machine code to be 
CALLed from BASIC. 7 

Owners of the BBC Micro 
will notice that it is identical to 
that micro’s * DUMP 
command, which was so useful 
that a QL equivalent was 
needed. It uses standard QDOS 
calls and a little bit of devious 
programming. 

Finally, it should be noted 
that as the dump is in hex the 
utility has one very distinct 
advantage over a straight- 
forward “copy file to device” 
command — hidden control 
characters are there for all to 
see. 

NB: ‘header_asm can be 
found in last month’s issue. 


# A prograa to dun a nased file to a named device as hex and ascii 
i # By Adam Denning 17th Deceaber 1984 
3 # Copyright (C) 1984 Adaa Denning 


4 


5 INCLUDE advi_header_ase 
136 00000064 DATA 100 
157 
158 0 00000000 600E BRA.S START_P Ignore standard format code 
139 0 00000002 00000000 DC.L 0 
160 0 00000006 4AFB oc.W $4AFB Standard foraat identification 
161 0 00000008 0006 DCW 6 Program nase 
162 0 O000000A 445540504552 0C.B “DUMPER’ 
163 
164 0 00000010 43FA0142 START_P LEAL PBLOCK, Al 
165 0 00000014 34780006 WOVE.W = -UT_CON,A2 
166 0 00000018 4692 dSR (A2) 
167 0 O000001A 43FA0144 GET_FILE LEAL MESSAGE! Al Print Ist aessage 
168 0 0000001E 34780000 MOVE.W«UT_MTEXT,A2 
169 0 00000022 4£92 OSR (A2) 
170 0 00000024 7450 MOVEG 480,02 Fetch filename fro channel 
171 0 00000026 76FF MOVEO 4-1,D3 
172 0 00000028 43FA014C LEAL BUFFER+2,Al 
173 0 0000002 7002 HOVEG #10_FLINE, DO 
174 0 0000002E 4E43 TRAP 3 
173 0 00000030 2F08 MOVE.L = AQ,-(A7) Save console channel 1D 
176 0 00000032 41FA0140 LEA.L BUFFER, AQ Get ready for I0_OPEN call by 
177 0 00000036 5381 SUBQ.L #1,D1 converting line fetched to a 
178 0 00000038 3081 MOVE.W = D1, (AO) string, removing LF fro count 
179 0 0000003A 7601 WOVEG #0PEN_INS,D3 Open this file for input 
180 0 0000003C 72FF MOVER #-1,D1 
181 0 O000003E 7001 MOVER 410_OPEN,DO 
182 0 00000040 4642 TRAP 42 
183 0 00000042 4A80 TST.L 00 Error? 
184 0 00000044 670A BEG.S 60T_FILE No - so continue 
185 0 00000046 205F MOVE.L == (A7)+,A0 Else retreive console channel ID 
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186 0 00000048 347800CC 
187 0 0000004C 4£92 
188 0 0000004E 60CA 
189 0 00000050 225F 
190 0 00000052 2F08 
191 0 00000054 2049 
192 0 00000056 43FA0116 
193 0 0000005A 34780000 
194 0 QOO0005E 4E92 
195 0 00000060 7450 
196 0 00000062 74FF 
197 0 00000064 43FA0110 
198 0 00000068 7002 
199 0 00000068 4E43 
200 0 00000060 2F0B 
201 0 OOO000KE 41FA0104 
202 0 00000072 5381 


203 0 00000074 3081 

204 0 00000076 7602 
205 0 00000078 72FF 
206 0 0000007A 7001 

207 0 00000070 4642 
208 0 0000007E 4A80 
209 0 00000080 670A 
210 0 00000082 205F 

211 0 00000084 347800CC 
212 0 00000088 4£92 
213 0 000000BA 40CA 
214 0 0000008C 225F 
215 0 000000RE 2F08 
216 0 00000090 2049 
217 0 00000092 7002 
218 0 00000094 4642 
219 0 00000096 7800 
220 0 00000098 204F0004 
221 0 0000009C 7003 

222 0 0000009E 43FA00D4 
223 0 000000A2 7408 
224 0 000000A4 74FF 
225 0 000000A6 443 
226 0 000000A8 2E00 
227 0 OOODO0AA 4041 

228 0 OOOCOOAC 6750 
229 0 OOO000AE 5341 

230 0 00000080 7000 

231 0 00000082 1C01 
232 0 00000084 2057 
233 0 00000086 3A04 
234 0 000000BB 6160 
235 0 O00000BA 6158 

236 0 OO0000BC 6156 
237 0 Q0O000BE 45FA0OB4 
238 0 000000C2 2F06 
239 0 00000004 1A1A 
240 0 00000006 6164 

241 0 00000008 614A 
242 0 QO0000CA SICEFFFE 
243 0 OOOOO0CE OC4F00070002 
244 0 00000004 670C 
243 0 000000D6 7006 
246 0 000000D8 9C97 
247 0 Q00000DA 6170 
248-0 000000DC 4136 
249 0 OOOOOODE SICEFFFA 
250 0 000000E2 6130 

251 0 000000E4 2C1F 
252 0 000000ES 45FA00RC 
253 0 OOOO00EA 121A 

254 0 OOO0O0EC 612A 


255 0 QOOQO0EE 6124 
256 0 000000F0 SICEFFFE 
237 0 000000F4 720A 
258 0 000000F6 614¢ 
259 0 QO0000F8 5044 
260 0 OOO000FA 4887 

261 0 OOQOOOFE 679A 
262 

263 0 OOO000FE 7002 
264 0 00000100 205F 
265 0 00000102 4642 
266 0 00000104 205F 
267 0 00000106 7002 
268 0 00000108 4642 
269 0 0000010A 7005 
270 0 0000010C 72FF 
271 0 OOO0010E 4E41 
272 0 00000110 7000 
273 0 00000112 4E75 
274 

273 0 00000114 7220 
276 0 00000116 6020 
277 

278 0 00000118 0201007F 
279 0 O000011C 0C010020 
280 0 00000120 6C22 

281 0 00000122 722E 

282 0 00000124 S01E 


S0T_FILE 


GET_OUTP 


GOT_OUTP 


DUAPLOOP 


HEXLOOP 


STARLOOP 


NOT_END 


ASCLOOP 


JOB_END 


SPACES 


ASCOUT 
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HOVE. 
JSR 
BRA.S 
HOVE.L 
WOVE. L 
NOVE.L 
LEA.L 
MOVE. W 
JSR 
NOVEG 
NOVEG 
LEA.L 
MOVEQ 
TRAP 
HOVE.L 
LEAL 
SUBQ.L 


HOVE.W 
NOVEG 
NOVEO 
HOVEO 
TRAP 
TST.L 
BEQ.S 
HOVE.L 
HOVE. W 
ISR 
BRA.S 
HOVE.L 
NOVEL 
MOVE.L 
NOVEO 
TRAP 
NOVEO 
HOVE.L 
NOVEO 
LEA.L 
NOVEO 
NOVEO 
TRAP 
NOVE.L 
TST.W 
BEQ.S 
SUBQ. W 
NOVEO 
NOVE. B 
NOVE.L 
HOVE. W 
BER.S 
BSR.S 
BSR.S 
LEA.L 
NOVE.L 
HOVE. B 
BSR. 
BSR.S 
DBRA 
CHPI.W 
BEQ.S 
NOVEO 
SUB.L 
BSR.S 
BSR.S 
DBRA 
BSR.S 
MOVE, L 
LEA.L 
NOVE.B 
BSR.S 
BSR.S 
DBRA 
NOVEO 
BSR.S 
ADDO. W 
TST.L 
BEQ.S 


HOVER 
MOVE.L 
TRAP 
MOVE.L 
HOVER 
TRAP 
HOVEO 
MOVER 
TRAP 
MOVES 
RTS 


MOVER 
BRA.S 


ANDI.B 
CHPI.B 
BEE.S 
MOVEG 
BRA.S 


UT_ERR, A2 
(A2) 

BET _FILE 
(A7)+,AL 
AO,-(A7) 

AL AO 
HESSAGE2, Al 
UT_MTEXT,A2 
(a2) 

400,02 
4-1,03 
BUFFER#2, Al 
#10_FLINE,DO 
8 

A0,-(A7) 
BUFFER, AO 
41,01 


D1, (0) 
OPEN NEW, D3 
§-1,01 
410_OPEN, DO 
#2 

D0 
8OT_OUTP 
(A7)+,A0 
UT_ERR,A2 
(a2) 
BET_OUTP 
(A7)+,AL 
A0,-(A7) 
A1,A0 
#10_CLOSE ,DO 
) 

40,04 

4(A7) ,A0 
#10_FSTR6,D0 
BUFFER, AL 
98,2 
4-1,03 

8 

00,07 

mM 

JOB_END 
41,01 

40,06 

D1,D6 
(A7) 80 
04,05 
FOURHEX 
SPACES 
SPACES 
BUFFER, A2 
Db, -(A7) 
(A2)+,D5 
TWOHEX 
SPACES 

D4, HEXLOOP 
47,2(A7) 
NOT_END 
46,06 
(A7) ,D6 
THOSTARS 
SPACES 

D6, STARLOOP 
SPACES 
(A7)+,D6 
BUFFER, A2 
(A2)+,D1 
ASCOUT 
SPACES 

Db, ASCLOOP 
410,01 
OUTCHAR 
08,04 

07 

DUMPLOOP 


#10_CLOSE, DO 
(A7)+,A0 

2 

(A7)+,00 
#10_CLOSE,DO 
mv) 
#HT_FRIOB,DO 
@-1,01 

ul 

40,00 


ep 
OUTCHAR 


487F DI 
yD 
DUTCHAR 
a.'01 
OUTCHAR 


and write requisite error aessage 
to it. Then try again. 


Put console channel ID in Al 
save file channel ID on stack 
@ake console current channel 
Print 2nd message to console 


Get output device specification 
from console and open it as file 


Save console channel ID 
Point to start of string 
“Remove’ trailing L/F 


Save count at start of string 


Error? 

No - so continue 

Retrieve console channel ID 
print requisite error aessage 
and try again 

Swap console and output channel 


IDs on stack and close the 
console device, 


D4 is byte counter 
Get input file channel ID 
and read <8 bytes into buffer 


Save error return in D7 
If bytes got = 0 then leave (eof) 


Get D1 ready for DBRA loop 

and put into Dé.L 

Get output channel ID 

Print byte counter as 4 hex digits 
+eefollowed by two spaces 

Save inline counter 

and print each byte as 2 hex digits 
followed by a space 


If DO¢7 then fill with asterisks 


number of asterisks = 6 - old Db 


Now print bytes as ASCII 


followed by a line feed 
Wext line of 8 bytes 

Did I0_FSTR6 have an error? 
Noy so repeat 


Else close channels and kill job 


In case the code is CALLed 
Prints a space 


Print nyte as ASCII, with control 
codes being shown as ‘.’ 
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283 

284 0 00000126 E04D FOURHEX LSR.W 48,05 Print D5 as four hex digits 
285 0 00000128 6102 BSR.S TWOHEX 

286 0 0000012A 1A04 MOVE.B = D4, DS 

287 

288 0 00000120 1205 TWOHEL = MOVE.B DS, D1 Print DS as 2 hex digits 
289 0 0000012E £809 LSR.B 44,01 

290 0 00000130 6102 BSR.S OUTHEX 

291 0 00000132 1205 MOVE.B = D5, DL 

292 

293 0 00000134 0201000F QUTHEX ANDILB © $$F Di 

294 0 00000138 04010030 ADDI.B = #°0", DL 

295 0 0000013C 0C01003A CHPIL.B «|= #':',DI 

296 0 00000140 6002 BLT.S QUTCHAR 

297 0 00000142 5E01 ADDG.B = «#7, D1 

298 0 00000144 7005 QUTCHAR MOVE 410_SBYTE,DO Output character in Di 
299 0 00000146 76FF NOVEO #-1,D3 

300 0 00000148 4643 TRAP LAY 

301 0 00000140 4£75 RTS 

302 

303 0 00000140 722A TWOSTARS HMOVEO #'#' DL Print two stars 

304-0 QQQO014E GIF4 BSR.S OQUTCHAR 

305 0 00000150 722A MOVER ae’ DI 

306 0 00000152 40FO BRA.S QUTCHAR 


307 


308 # Console device specification 

309 

310 0 00000154 0000 PBLOCK DC. W 0 No border 

311 0 00000154 0004 DC.W 4 black paper green ink 
312 0 00000158 0188 DC.W 440 width 

313-0 0000015A OO1E DC.W 30 height 

314 0 0000015¢ 0024 OC.W 36 X position 

315.0 0000015 0012 0C.W 18 Y position 


316 
317 0 00000160 0008 


NESSAGE! DC.W 


i 


318 0 00000162 447560702066 0C.B ‘Duap filer ‘,0 
Ait) 
320 0 0000016E 0004 NESSAGE2 DC.W 4 
321 0 00000170 546F3A20 0C.B ‘Tor 
322 
323 00000174 BUFFER — EQU * 
34 
325 END 
#e88¢ TOTAL ERRORS 0 (line 0) 
#848 TOTAL WARNINGS 0 (line 0) 

memory usage 12 kbytes 











Allin Order 


Here is a short procedure 


mask will be a string in the 
form “00000.000”. For 


that permits figures of varying example: 
magnitude to be printed ina | Command Output 
neat tabular form. It should be 
used to replace “PRINT” “0000.000”,13.34  0013.340 
statements on a listing. 

When the procedure is “£##0.000”,-13.34£ 13.340— 


called, a ‘mask’ followed by a 
number or numeric variable 
should be passed across. The 


100 
110 
120 
130 
140 
150 


Note: The hash character 
the mask produces a space, 
other characters will print. 





aS= "" ###00000. ###" 

FOR loop = 1T05 

PRINT_MASK a%,-13.34*loop:PRINT 13.34“loop 
END FOR loop i 

STOP 

DEFine PROCedure PRINT_MASK (mask# , number #) 


160 LOCal loop,1_m,1_n,dec_pos,dec_place,dec_displ 
ssign,results 

170 sign = "-" INSTR numbers 

180 IF sign THEN number%=number #* (-1) 

190 1_m = LEN(mask#) 

200 1_n = LEN (number) 

210 dec_place = "." INSTR mask# 

220 dec_pos = "." INSTR numbers 

230 IF NOT dec_place THEN dec_place = 1_m+i 

240 IF NOT dec_pos THEN dec_pos = 1_nti 

250 dec_displ = dec_place - dec_pos 

260 result = mask 

270 result$(dec_displ+1 TO (dec_displ+l_n)) = numb 
ers 

280 FOR loop = i TO 1_m 

290 IF result#(loop)="#" THEN result$(loop)=" " 
300 END FOR loop 

310 IF sign THEN result = result$&"-" 

320 PRINT results 

330 END DEFine 








One year old... ‘ 
and look how we've grown! 


When we launched the QL last year, we knew we were starting a 
revolution. 

For the first time, the serious computer hobbyist could afford the 
same power and performance as the professional computer user. 

A year later, and the QL is more than a unique computer, it's the 
heart of a unique system. 

And the next 12 months promise even more for QL owners... 
new software options, extra storage devices, printers, monitors... 

Read on, and see how far we've come, and how much further 
we're going! 


ADVERTISEMENT 








ADVERTISEMENT 


NIGEL 
EARLE 


a= Now it's the 
quantum leap for 
QL software and 
peripherals 


Without doubt, the QL was the computer innovation of 1984. 
Launched to outstanding reviews, it soon gathered thousands 
of happy owners, and recognition from people like ICL, who 
have incorporated QL technology and its Microdrives into 





sinclair Ol 


the new One Per Desk. 

The quickest glance at the QL's 
specification shows what the 
fuss was all about...128K RAM, 
32-bit processor architecture, 
200K built-in mass storage, 
bundled software, They're fea- 
tures that would normally cost 
you three or four times as much! 

But that’s only half the story, 
because the QL is now the 
heart of a computer system, 
with a growing library of soft- 
ware... 

As you'll see from these 
pages, 1985 is the year of the 
quantum leap for software and 
peripherals. Already there are 
no less than five QL lang- 
uages together with special pro- 
grams for software developers, 
a world-beating chess game... 
and much more on the way! 

On the hardware side, there's 
a special QL monitor to make 
the most of that high-resolution 
512 x 256 pixel display. There 


QLUB:10,000 members and 


QLUB is the special Users Bureau 
for Sinclair QL owners. There 
are now well over 10,000 QLUB 
members, and membership is 
growing all the time. 

For their annual subscription 
of £35, QLUB members are en- 
joying a whole range of infor- 
mation and advisory services, 
exclusive offers and special 
discounts. 

One of the most important 
QLUB benefits is the special 
news magazine, appearing six 








are memory expansion boards, 
Winchester disk drives, printers, 
and low-cost Microdrive cart- 
ridges. 

In fact, there's so much going 
on, we'll be running these 
regular Newsletters just to keep 
you in touch! 

If you already own a QL, 
the next few pages will give 
you a taste of the exciting year 
ahead. 

And if you don't ... take a 
look at what you're missing. It 
should be all the persuasion 
you need! 

Now read on...the quantum 
leap into serious computing 
starts here. 


Nigel Searle, Managing Director, 
Sinclair Research Limited. 


times a year. The magazine pro- 
vides a forum for QL owners to 
exchange views and keep in 
touch with all the latest develop- 
ments. 

Each issue is packed with 
updates on QL hardware and 
software, tips on applying the 
four QL Programs, and news of 
how other people are using the 
QL. QLUB members also receive 
a range of special discounts, 
with savings of at least 20% on 
selected software products. 








From sophisticated business packages to superb animated games... 
QL software makes the most of the computer's extraordinary specification. 


New QL Software 


Utilities, languages, games and business 
packages...with more on the way! 


Two things are now certain 
about QL software. First, there's 
going to be plenty of it. And 
second, it's going to set com- 
pletely new standards for 
microcomputers... 

At the moment, there are 
well over 100 software programs 
in development. And the first 








software releases, shown here, 
demonstrate how exceptional 
the best QL software will be. 
The QL already has five 
languages, superb programs for 
software developers, a top 
quality accounting package and 
in QL Chess it has its first game. 





growing! 


Current special offers include: | QL Assembler for £31.95 
QL Chess for £14.95 QL Cash Trader for £54.95 
QL Toolkit for £19.95 Special subscription rates 


for Personal Computer News 
and QL User. 





The multilingual 
Sinclair QL 


BCPL — a forerunner of C, BCPL 
has been described as a systems 
programmer's delight. In the 
words of QL User, this com- 
piler is a ‘brilliant compromise 
between a high-level language 
and a low-level systems lan- 
guage’. Whilst not for beginners, 
this is an essential buy for any- 
one with a good knowledge of 
systems programming. Complete 
with manual. 

Available from 

Metacomco- £59.95. 

Tel: 0272 428781. 
LISP—already well-known for 
ts artificial intelligence appli- 





Psion trouble- 
shooting service 


All QLUB members can obtain 
special assistance from Psion 
an using the QL Quill, Abacus, 
Archive and Easel programs 
supplied with the computer. 
Psion will normally answer any 
queries within 48 hours. 





ADVERTISEMENT 
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cations, LISP is a powerful and 
versatile language. This is a 
sophisticated implementation 
of LISP, by one of its leading 
exponents, Dr Arthur Norman. 
This package features full QL 
graphics, and a full manual is 
supplied. 

Available from 
Metacomco-£59.95. 

Tel: 0272 428781. 






Pascal-probably the most 
popular high-level language of 
all. Pascal is particularly well- 
suited to structured program- 
ming sophisticated data manipu- 
lation and algorithmic problems. 
Pascal interpreter complete 
with 87-page manual. 
Available from 

Computer One - £39.95. 

Tel: 0223 862616. 


| Forth | Pascal | = 








Forth - this ‘new generation’ 
language is proving both popular 
and easy to learn. The program 
provides a full implementation 
of the latest Forth 83 standard 
with graphics and sound exten- 
sion. 

Available from 

Computer One-£29.95. 

Tel: 0223 862616. 


APL - the compact mathema- 
tics-based interpreted language 
designed for scientists and 
mathematicians. 

APL keyword _ interpreter 
complete with manual. 
Available from 
MicroAPL - £99.95. 

Tel: 01-622 0395. 


Programmer's 
packs 


QL Assembler -two programs 
operating in tandem. The first 
is a full-screen editor for creating 
and altering program files. 
The second, a Motorola-format 
compatible 68000 assembler 
which converts source files 
written in M68000 assembly 
language into machine code 
files which can run on the QL. 

Both assembler and editor 
are written in machine code 
and can be multitasked with 
SuperBASIC, so you can switch 





between editor, assembler and 
SuperBASIC instantly. 

Written by GST Computer 
Systems — £39.95. * 

QL Toolkit - a programmers 
toolkit with over 70 programs. 
and extensions to SuperBASIC. 
Most are linked to SuperBASIC 
initially and can then be used 
from commands or from within 
a program. Enhancements in- 
clude printer spooling (print a 
file while running a SuperBASIC 
program); improved file access 
(with full random input/output 
command); job control (allows 
management of multi-tasking 
programs including the ability 
to display, alter priorities, and 
delete jobs from the QL): and 
SuperBASIC screen editor. 
Written by Q Jump-£24.95.* 


World-beating 


chess! 
QL Chess -—fresh from its victory 
at the World Microcomputer 
Chess Championship. This pro- 
gram. sets a completely new 
standard for games software. 
There's a high resolution dis- 
play, animated 3-D graphics, 
and 28 levels of play from 
novice to champion. Features 
include an openings book of 
nearly 4000 moves, HINT and 
TAKEBACK functions that help 
you learn from your mistakes, 
and the option to play a human 
opponent or the computer. 
Written by Psion - £19.95.* 


Software at work 
QL Touch 'n’ Go - a unique 
approach to learning touch- 
typing skills. The program is 
designed to give you mastery 
of the standard QWERTY key- 
board in just 24 hours. With 
practice, you should soon reach 
40 words per minute, with over 
95% accuracy. 
Written by Harcourt -£24.95,* 


QL Cash Trader - a unique 
computerised book-keeping 
system for small businesses. The 
program provides a complete 
course in the principles of ac- 
countancy, and goes on to 
become an essential aid in the 
day-to-day running of a busi- 
ness. Complete with compre- 
hensive martual. 

Written by Accountancy 
Software of Torquay -£69.95.* 


* 
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An industry is born 


From the moment of its launch, the revolutionary QL attracted 
massive interest from all quarters. 

In one area, the interest quickly turned to action, as high- 
tech hardware manufacturers realised the immense potential 
of the QL for vast expansion, for system development and for 





widespread networking. Already the list of peripherals for 
the QL is very exciting -— and lengthening by the day! 


Here, we've covered many of the latest, most important 


developments. 


As more appear, be sure to keep in touch with QL News! 
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The dedicated Sinclair 


Vision QL monitor 


Once you see the incredible 
graphics capabilities of the QL 
you may decide an ordinary TV 
just can't do them justice. 

If thats the case, a high- 
resolution monitor is needed. 
(And if you're creating presenta- 
tion-quality charts, for example, 
it's quite essential.) 

The new Vision QL monitor 
is specially designed for the 
computer by Kaga Electronics, 
with full support from Sinclair 
Research. 

So it exploits the QL's maxi- 





mum 512 x 256 pixel resolution 
to the full, with a pin-sharp 85 
column display. 

It's also specially styled to suit 
the QL - in looks, and in use. 
There's a 12” non-glare tube, 
and etched screen to diffuse 
reflections. 

So the display is bright, sharp, 
much easier to look at... and 
invaluable for those late-night 
programming sessions! 

And like the QL, the Vision 
monitor is designed with space 
in mind: it has a compact foot- 











It's available from MBS Data 
Efficiency on 0442 60155 and 
selected Sinclair stockists, 


print of just 121%” by 15” — no 
more than a typical portable 
typewriter. 








command? Change to format 2 


The QL's superb graphics capabilities — as demonstrated by the Sinclair Vision QL 
monitor. 






ADVERTISEMENT 


Microdrive cartridges. 
Now only 


Microdrive cartridges are the 
QL's own unique storage media. 
Each stores up to 100K of .in- 
formation, on a cartridge no 


£1.99! 


bigger than a matchbox! 

Over 500,000 cartridges are 
now being used throughout 
Britain. And QL Microdrives 


= ea 
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Sinclair Microdrive cartridges - up to 100K of programs and data on a medium so compact you can pop it into your pocket. 





themselves are standard equip- 
ment on the new ICL One Per 
Desk micro. 

Now there's more good news 
for QL enthusiasts: from Feb- 
ruary 1, the cost of QL Micro- 
drive cartridges are down from 
£4.95 to £1.99 each! 





Powerful hard- 
disk system 


For the QL business user, the 
new Firefly QL Winchester disk 
will boost the QL'’s power in 
one huge leap. 

Designed by Quest, it uses 
CP/M and offers all the benefits 
of Winchester technology: fast 
access, reliability, compact size 
and quiet operation. 

With 75 Mb storage, the 
Quest Firefly is ideal for large 
databases such as stock or cus- 


Interface options 


The QL comes complete with 
two built-in RS-232C interfaces. 

In addition, interfaces for 
Centronics printers are widely 
available from manufacturers 
such as CST, Miracle Systems 
and Sigma Research .. . with 








tomer lists. And at under £1,200, 
it represents exceptional value 
for money. 

The Firefly will be available 
very shortly from Quest on 
04215 66488. 








Winchester hard disk drives supplement 
your QL’ built-in mass storage. 





prices from only £35. 

And that's just the beginning. 
For attaching scientific and 
laboratory instruments to the 

QL, CST even offer an IEEE-488 
interface, which can handle up 
to 16 connected devices simul- 
taneously! 


4 Centronics interface slips discreetly into place. 





Expansion boards 
for up to 4 times 
more memory! 


Also from Quest, a simple and 
inexpensive way to expand the 
QL's RAM: with memory ex- 
pansion boards. 

These compact units connect 
to the standard QL expansion 
port, using the QL's internal 
power source or, for larger 
boards, an external power source. 

The units range from 64K 
and 128K RAM boards to mas- 
sively powerful 256K and 512K 
RAM boards, so there's some- 
thing for every user. 





Compact expansion boards. 


Prices start at £117, and the 
512K board is a very cost-effec- 
tive investment at just £587. 

With affordable memory like 
this, the QL is more than a 
match for any other micro 
under £2,000! 





Where to find the QL. The Sinclair QL is available at selected branches of Dixons, 
WH Smith, John Lewis Partnership, Currys, Greens in Debenhams and Ultimate, and larger 
oranches of Boots, John Menzies and specialist computer stores nationwide. 


Src iSir— QL, QLvB, and Qdos, are trademarks of Sinclair Research Ltd. Quill, Easel, Archive and Abacus are trademarks of Psion Ltd. Due to 
siur policy of continual product improvement, Sinclair Research Ltd reserve the right to alter specifications at any time. 





The spec 
behind the 
spectacle 


CPU - Central Processing Unit 
Fast, powerful Motorola 68008 
chip. A second processor, an 
Intel 8049, controls the key- 
board, generates the sound, and 
acts as an RS-232C receiver. 


RAM 
128K. Now expandable to 640K. 


ROM 
48K. 


Operating system 

Qdos — revolutionary. single-user, 
multi-tasking, windowing opera- 
ting system. 


Storage 

Twin built-in QL Microdrives. Up 
to 100K storage each — transfer 
rate, up to 15K per second. 


Keyboard 

Full moving 65-key QWERTY, 
five function keys, four cursor 
keys. 


Language 
Sinclair structured SuperBASIC. 


Application software 
QL Quill-word processor 
QL Abacus —spreadsheet 
QL Easel —graphics 
QL Archive — database 
All four packages supplied 
with the QL. 


Interfaces 

Two serial RS-232C interfaces, 
Microdrive expansion port (up 
to 6 may be added), ROM 
cartridge port, local area net- 
work, 2 joystick ports, RGB 
monitor and TV output. 


Text screen 

Various modes — up to 85 col- 
umns by 25 rows on monitor. 
On TV, up to 60 columns. 


Graphics resolution 
512 x 256 pixels (four colour), 
256 x 256 pixels (eight colour). 


Sinclair Research Ltd 
Camberley, Surrey, GU15 3BR. 
Tel: Camberley (0276) 686100. 


—7| om | ool |— || 



























































CLASSIFIED 





DISC DRIVES 


QL DISC INTERFACE Double sided/double density, 5/4” or 32", up to 720K formatted file space/disc. On board s/w, random access files, extensive typeset manual. 
QL MICROVITEC CUB MONITOR with cable for QL— £265 QL TOOLKIT adds tabulate, memory modify in hex, decimal, octal, bytes/words + much more— £14.95 


QL MICRODRIVE CARTRIDGES— 4 in wallet— £19 


QL CENTRONICS PRINTER INTERFACE — £38 


Prices include VAT and delivery 


QUPWAE COMPWARE, 57 Repton Drive, Haslington, Crewe CW1 1SA. 


QL SCREEN EDITOR PLUS 


Edit BASIC, assembler or other programs the easy way. Bi-directional 
scrolling, full cursor movement, insert, delete, find etc. RAM based, so no 
waiting for microdrive access; uses 85 character screen. 


Microdrive also contains machine coded BASIC command extensions to allow 
your programs to use true windows. 


£12.50 from S Gaymer, 16/18 Princes St, Ipswich, IP1 1RQ 


* QL COMPENDIUM x 


SOLAR INVADERS. Arrived at last . . . Out of this world! 1 to 4 players. 

WALL-BREAKER. Keep the ball in play to break the wall. Fast and smooth animation. 1 to 4 players, 5 difficulty levels. 
DRAUGHTS. The classic board game, can you beat it? Full board display, 1 or 2 players. 

MINEd YOUR PATH. Help the soldier cross a minefield of ever increasing hardness. Furious fun for 1 to 4 players with 10 
difficulty levels. 

STATISTICAL AVERAGES. Standard deviation, geometric mean, median, etc. Fast processing and straight forward 
to use. 

CALENDER. Generate a calender for any month of any year, also discovers the date of Easter. 

All of the above programs for £10.00 or £5.00 if you send your own micro-drive cart. Menu loading, instructions and 
p&p included. 

Fast delivery from: EQUATE, 2 FFORDD DERWYN, PENYFFORDD, CHESTER CH4 OJJ 


new From BEDSOFT 


“FULL SCREEN EDITOR” with two modes of operation — full 
screen cursor editing and full screen line editing featuring: multiple 
line delete/add, renumiber, global string change and many other 
commands together with full MDV control and FULL SCREEN 
DIRECTORY. 

In alla package to save hours............ dsislavaenadncsneenteace sabiaaies £11.95 
Also the popular ‘“‘“GAMBLER” game combining skill and chance. 
Become addicted for ........ ae wee £5.95 
And “BEAT THE CLOCK” requiring quick thinking and judgement. 
FOR AN AGC Shee sescpeeresscsciss t=. sascncinenszesteaieesnaccavinoaccasznesiiusvsnsinat £5.95 
“AUTO-DRAW” Draw on the screen quickly and easily. Converts 
your drawing into “BASIC” commands for adding to your own 
program. Simplifies “‘WINDOW” definitions for your drawing to be 
scaled and multiple displayed for games programming. Full colour 
and “FILL” control, saving on MDV, modifying and MUCH more. 
For fUN ANd SETIOUS USC ........ceseeeseeeeeecseeeeeesssensntassesetscsecacees £10.95 
* Please add £5 per order for cartridge or send your own or send 
your files on cartridge for printing at £2 per file and have your order 
returned on the same (formated) cartridge. 

Ask for details of our RESIDENTIAL COURSES ranging from 
introductory to advanced and business users. 


BEDSOFT, 30 Lansdowne Road, Bedford 


WDSoftware 
For the QL: WD UTILITIES (3rd ed) (base £5.50) 
View 60-file DIRectory on one screen, one-key LOAD, COPY or print 60 files with one key (allows for 


























namesakes). Multiple FORMATting to prevent corruption by stretching of tape. TOOLkit to give 
dated, numbered modules in program development. PRUNE old files to release space (one key 
DELETEs a file). Full instructions in QUILL file. Use up to 6 EXTRA MICRODRIVES (add on your 
Spectrum ones)! 
WD MORSE TUTOR (base £4) 
From absolute beginner to beyond RYA and Amateur Radio receiving. Adjustable pitch. Set speed to 
your target level (4-18 wpm). Learn code with single characters, progress from groups with 
lengthened spacing to random sentences; decrease spacing to normal. Write what you hear, then 
CHECK against SCREEN or PRINTER. Also own message, random figures, letters or mixed. 
Ref QL (1st ed) (base £1) 
100+ useful QL references in an ARCHIVE file. 
Prices: £4.50/cartridge plus base price 
Two or more programs on one cartridge — pay cartridge + bases. E.g. WD utilities and Ref QL for 
£11. Send YOUR FORMATted cartridge and pay base rice only.(but OURs have been FORMATted 
AT LEAST six times)! Send OUR cartridge and 25p to update earlier editions... 
WDSoftware, Hilltop, St Mary, Jersey. Tel. (0534) 81392 


Q.L. PROGRAMMER REQUIRED 


to help North-West businessman formulate a program to use within 
his consumer credit business. 


Phone, day — (051) 260 5544 
night — Burscough (0704) 893922 
Ask for Mr Dunn 
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Tel: (0270) 582301 


DataManagement QL software 
— leading the way 


SBUTIL — (£9.00) — Possibly the last word in Basic programming utilities. 
Constant readout of: Line No & Statement/Data Line & Statement/Dynamic 
Basic Size. Full SuperBasic speed control via the Basic Editor. 4 formats for 
all Screens and tastes. No more wondering where things go wrong. This tells 
you exactly where you are at all times. 

MBACKUP — (£8.00) — An independent, fast & reliable backup to/from Mdv 
or Disk. File additions, over-writes and file Sizes fully displayed. 
TERMINAL — (£12.50) — A superb full featured terminal package. Full 
protocol control and ability to recall previous setups. Job control, clock and 
alarm modules, together with Piping for mdv and printer. Full mdv and disk 
control without exiting: copy, delete or save to files. Monitor version only. 
CHARGEN — (£10.00) — A very comprehensive character generating 
package. Includes extra functions for SuperBasic to control your creations. 
Founts can be saved to disk or mdv for recall and use. No copyright restriction 
on the subsequent publication using these features. ° 

SBEXTRAS — (£6.00) — Many extra features and procedures to add to 
SuperBasic. Includes full job control, dynamic file access with byte or variable 
GET/PUT. LENGTH, REMAINDER, QUOTIENT, HEX, DEC and many 
more. 

FM — (£12.50) — A full feature file management package. If you need to do it 
to a file, this will do it for you. Supports disks/mdvs, wildcard and formatted 
printing to help your library control. 

All the above are 100% mi/language, multi-tasking and will run 
independently under QDOS. Prices shown include VAT & P/P, but add 
£4.95 per order for a mdv cartridge. 

Cheques or P/Os to DataManagement: 12 Larch Way, Haxby, YORK, 
YO3 8RU or telephone (0904) 760351 (anytime) for our latest list, which 
is growing daily. 

Have you written any good QL software. We are looking for the best 
software and are prepared to pay the best royalties. 

Coming Soon: FED — a full feature file editor: DisAssem (if you don’t know 
what it is — you won’t need it!); NeatList — to keep those printouts beautiful; 
and many, many more. Write or Phone for your list — Now. 





EXECUTIVE ADVENTURE 


Can YOU rise from lowly tramp to high flying 
executive, in this unusual modern day adven- 
ture? Pit your wits against puzzles, mazes; test 
your skills in money management and devious 
dealings. No dragons in this highly original and 
demanding adventure (except the secretary)! 


only £15 


INTERSOFT 
7 Richmond Road, Exeter 













INVESTORS! 
Track your shares with “STOCKMARKET MANAGER” from Portfolio Software 
Facilities include: ¢ Simple entry of purchases, sales, prices etc. @ Portfolio valuation — 
analysed by investment type comparison of performance against market. @ Calculation 
of % return on each investment. ¢ Assessment of Capital Gains Tax liability. e Handles all 
investment types, including Traded Options. 
Orders/Cheques to: PORTFOLIO SOFTWARE, PO Box No. 15, London SW115RP 
Please send: “STOCKMARKET MANAGER" @ £39.95 incl. p&p. 
Information sheet (please enclose SAE) 


No. of copies 














Name 
Address ...... 
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QL POWER 


AT YOUR FINGERTIPS FROM COMPUTER ONE 
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PASCAL £39.95 ...vs:5:0 


Computer One PASCAL is a powerful implementation of this classic programming 
language. Produced specifically for the QL, this package provides a professional and 
highly educational programming system. Complete with comprehensive 80 page manual, 
this is the ultimate language package that no QL enthusiast can do without. 
INCLUDES: « Full Screen Editor * QL graphics and sound extensions 

* Example programmes * Complete 87 page User Guide 

* Full implementation close to ISO-standard * Typically 15x faster than BASIC 


FORTH £39.95 vou 


FORTH is easy to learn, highly efficient, and allows you to explore the full capabilities 
of your QL. Computer One FORTH is a full implementation of the latest FORTH-83 
standard with graphics and sound extensions, and may be used to produce machine 
code applications for your QL. Ideal for writing real-time or games programs. 
INCLUDES: * FORTH-83 system * Forth Screen Editor * 48-page manual 

* Ql-graphics and sound extensions * Example FORTH programs 


ASSEMBLER £29.95 ....v::::. 


COMPUTER ONE Assembler is a comprehensive assembler program toolkit providing a 
professional multitasking assembler written in machine code for speed and compactness. 
An ideal package for the machine code programmer, allowing you easy access to the 
QDOS operating system, and integration to your Superbasic and Pascal programs. 
INCLUDES: * 68008 Assembler * Full Syntax Checking * Full screen editor 

* Comprehensive User Manual * Integrates to Pascal and Superbasic 


TYPING TUTOR 
E1995 -var sce 


Let your Sinclair QL teach you to type! | 
Computer One’s Typing Tutor is a fast, | 
easy and enjoyable way of learning 

true touch-typing on your QL. 
INCLUDES: « Self-paced tutorials Address 
* Speed and accuracy diagnosis 
* Interactive colour graphics 


* User Guide 


computer ONE < , 
| 


SCIENCE PARK, MILTON ROAD,CAMBRIDGE 


Name 














Tick Order 
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TYPING TUTOR 


ASSEMBLER = 





2 UL 





Method of Payment- 

by cheque or P.O. (no cash) and made payable to 

COMPUTER ONE, or by charge card. ean 
Access Card No. QU/3/85 


HUGE SEAR RES LRES 


Total amount £ 
enclosed with order 


Credit card sales: UK buyers only. Tel: (0223) 86261 °| 
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Explore the ancient dwelling-place of 
the Dwarves—where the Wizard guards 


the last precious secret. 


Aclassic and complex text, adventure _ 
with hundreds of locations andahuge _ 
vocabulary. Set in real-time with traps, 
tasks, puzzles and mazes — -and a special 
note-pad feature to aid \ you. : 


“the quality of the game is super” g 
MicroAdventurer = 


- PRE 


£19. 95 


+ 50p eae andpacking 
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+ 50p postage 
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